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J 1.0 INTRODUCTION 

I 1.1 ABSTRACT 

1 THE RM05/3/2 DISKLESS DIAGNOSTIC IS A STAND ALONE PROGRAM Wf'ICH 

% USES FUNCTIONAL AND DIAGNOSTIC MEANS TO VERIFY THE OPERABIL I TY OF THE 

I DISK SUBSYSTEM EXCLUDING AND INDEPENDENTLY OF THE STORAGE MODULE 

| DRIVE. IN PARTICULAR. THE PROGRAM SERVES THE FOLLOWING PURPOSES: 

]° TO DETECT ERRORS AND FAULTS IN THE RM MASS8US ADAPTER; 

]l TO RESOLVE HARDWARE FAILURES IN RM TO A FIELD REPLACEABLE 

\l MODULE OR MODULES. 

•!5 
16 

}g 1.2 UNIT UNDER TEST 

In THE UNIT UNDER TEST (UUT) IS THE RM05/3/2 DISK SUBSYSTEM. 

|l EXCLUDING THE STORAGE MODULE DISK DRIVE AND THE MASSBUS CONTROLLER. 

22 
23 

25 2.0 OPERATING REQUIREMENTS 

27 2.1 HARDWARE REQUIREMENTS 

?o THE FOLLOWING MINIMUM HARDWARE CONFIGURATION. ASSUMED TO BE 

S OPERATIONAL, IS REQUIRED TO LOAD AND EXECUTE THE RM05/3/2 DISKLESS 

31 DIAGNOSTIC: 

33 PDP-11 PROCESSOR 

il 12K MEMORY 

35 KW11-L OR LW11-P CLOCK 

% PROGRAM LOADING DEVICE 

37 TERMINAL 

§ 1 H T0 TdMOwITuM COMBINATION OF RM05'S. RM03'S OR RM02'S> 

AO 
41 

H 2.2 MEDIA REQUIREMENTS 
44 

45 . NONE 

46 

47 

49 2.3 PREREQUISITE DIAGNOSTIC PROGRAMS 

5? RM05/3/2 DISKLESS TEST, PT 1 

52 
53 

55 3.0 OPERATING PROCEDURF 

57 3.1 LOADING 
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59 THE PROGRAM MAY BE LOADED BY EITHER PAPER TAPE , USING THE 

60 STANDARD PAPER TAPE LOADING PROCEDURE, OR XXDP MEDIA, USING THE 

61 APPROPRIATE LOADING DEVICE. 
62 

63 

65 3.2 SWITCH OPTIONS 

66 

67 THE FOLLOWING SWITCH OPTIONS ARE INVOKED WHEN THE APPROPRIATE 

68 SWITCH IS ON. 
o9 

70 SW15 HALT ON ERROR 

71 SW14 LOOP ON TEST (CURRENTLY BEING EXECUTED) 

72 SW13 INHIBIT ERROR TYPEOUTS 

73 SW12 UNUSED 

74 SW11 INHIBIT TEST ITERATIONS 

75 SW10 BELL ON ERROR 

76 SW09 LOOP ON ERROR 

77 SW08 LOOP ON TEST IN SW07-00 
78 

79 THE LOW ORDER 8 SWITCHES ARE USED IN CONJUNCTION WITH SW08 TO SPECIFY 

80 THE OCTAL NUMBER OF THE TEST WHICH THE PROGRAM WILL LOOP ON. 
81 

82 
83 

84 3.3 STARTING 

85 

86 THE PROGRAM MAY BE STARTED AT LOCATION 200 OR 204. STARTING AT 

87 200 WILL BE THE NORMAL STARTING ADDRESS. STARTING AT 204 WILL ENABLE 

88 THE RH/RM BASE ADDRESS TO BE CHANGED. IF RUNNING IN A STAND-ALONE 

89 ENVIRONMENT. THE PROGRAM USES CONSOLE DIALOGUE TO ALLOW THE OPERATOR 

90 TO CONTROL TEST CONDITIONS. 
91 

92 
93 

94 3.4 HALTING 

95 

96 THE PROGRAM CAN BE HALTED BY TYPING CONTROL C FROM THE CONSOLE OR 

97 BY PRESSING THE HALT SWITCH ON THE PROCESSOR FRONT PANEL. 
98 

99 
100 

701 3.5 RESTARTING 

103 THE PROGRAM CAN BE RESTARTED AT ADDRESS 200 OR 204. (SEE SECTION 3.3) 

104 

105 

106 

107 4.0 OPERATOR INTERFACE 

108 

109 4.1 PROGRAM ID 

110 

111 THE PROGRAM TYPES ITS NAME AND MAINDEC NUMBER THE FIRST T IMF IT 

112 IS STARTED AFTER BEING LOADED. 
113 

114 



t 



CZRMQBO RM05/3/2 DSKLS TST 2 MACRO V04.00 



F 1 

4-APR-81 01:29:56 PAGfc 3-2 



S£0 OOOS 



115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

KO 

HI 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 



4.2 CONSOLE DIALOGUE 

WHEN THE PROGRAM IS RUNNING IN STAND A. ONE MODE , IT 
CONSOLE DIALOGUE SEQNENfE AFTER TYPING THE PROGRAM I.D.. 



ENTERS A 



THE FIRST QUESTION TYPED OUT IS: "TYPE HELP TEXT (L> N ?". 
IF T HE OPERATOR RESPONDS WITH A "Y", THE PROGRAM WILL TYPE A BRIEF 
HELP MESSAGE WHICH WILL LIST SWITCH OPTIONS. ETC. ANY OTHER RESPONSE 
TO THE QUESTION IS CONSIDERED A "N" AND NO HELP TEXT IS TYPED. THIS 
QUESTION IS ONLY ASKED ON THE INITIAL PROGRAM START AND NOT ON 
SUBSEQUENT START-UP'S. 

ON THE PROGRAM INITIAL START AND WHEN RESTARTING AT LOCATION 204, 
THE OPERATOR MAY CHANGE THE RH/RM BASE ADDRESSES WITH THE FOLLOWING 
DIALOGUE. 



EXAMPLE 1 

RMCS1 =176700 <CR> 
RMVEC=000254 <CR> 

EXAMPLE 2 



;N0 CHANGE IN ADDRESS 
;N0 CHANGE IN ADDRESS 



RMCS1=1 76700 177200<CR> ; CHANGE BASE ADDRESS TO 177200 
RMV£C=000254 260<CR> ; CHANGE VECTOR ADDRESS TO 260 

ON THE INITIAL START, THE NEXT QUESTION TYPED IS, 'TYPE "A" TO 
TEST ALL DRIVES, OR TYPE DRIVE NUMBER(S) AND TERMINATE INPUT WITH 
A CARRIAGE RETURN'. THEN, 'DRIVE(S):' IS TYPED AND WAITS FOR THE 
OPERATOR TO TYPE AN "A", TO TEST ALL POSSIBLE DRIVES OR TYPE ANY 
STRING OF DRIVE NUMBER(S) TO BE TESTED AND TERMINATE THE INPUT WITH A 
"CARRIAGE RETURN". NO COMMAS OR ANY OTHER SEPARATORS ARE NEEDED WHEN 
ENTERING THE DRIVE NUMBERS AS A STRING. THE PROGRAM ENTERS THE COMMA 
SEPARTOR AUTOMATICALLY AFTER TYPING EACH NUMBER. ON ALL SUBSEQUENT 
STARTS. ONLY THE 'DRIVEN): 1 PROMPT IS TYPED. 

THE DIAGNOSTIC THEN INITIALIZES AND REPORTS THE STATUS OF TME 
DRIVES WHICH WHERE PREVIOUSLY SPECIFIED FOR TESTING. THE FOLLOWING 
IS AN EXAMPLE PRINTOUT: 

'UNIT STATUS: 

0 ONLINE RM03 

1 LOAD DEVICE 

2 OFFLINE RM05 

3 NOT PRESENT 

4 NOT PRESENT 

5 NOT AN RM05/3/2 

6 NOT PRESENT 

7 NOT PRESENT' 

THE ABOVE UNIT STATUS SHOWS THAT DRIVE 0 6 2 WILL BE TESTED. WHILE DRIVES 
1,63-7 WILL NOT BE TESTED. 

THE DIAGNOSTIC THEN TYPES THE FOLLOWING MESSAGE. BASED 0\ THE 
STATUS OF THE DRIVE: 
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'DRJVE(S) TO BE TESTED, 0, 2' 

IF NO DRIVES ARE AVAILABLE FOR TESTING. THE FOLLOWING MESSAGE WILL BE 
TYPED TO THE OPERATOR: 

■DRIVE(S) TO BE TESTED, NONE 1 

THE PROGRAM WILL THEN. EITHER START TESTING THE DRIVES AVARABLt FOR 
TESTING OR RETURN TO THE BEGINNING OF THE PROGRAM AND WAIT. 

ONCE THE DRIVES START TESTING, THE FOLLOWING MESSAGE WILL OCCUR 
AS EACH DRIVE BEGINS TO BE TESTED: 

•DRIVE 0 
DRIVE 2' 

AFTER ALL THE DRIVES ARE COMPLETELY TESTED. THE END OF PASS 
MESSAGE WILL BE TYPED (SEE SECTION 4.3) AND THE PROGRAM WILL START 
TESTING ALL THE DRIVES AGAIN. THIS WILL CONTINUE UNTIL THE PROGRAM 
IS HALTED BY THE OPERATOR. 

NOTE: THE LETTER LOCATED WITHIN THE BRACKETS () INDICATES THE TYPE 
OF RESPONSE REQUIRED BY THE USER. D-DECIMAL, 0=OCTAL AND 
L=LETTER. 

4.3 PROGRESS REPORTS 

AN END OF PASS REPORT OCCURS EACH TIME THE PROGRAM IS EXECUTED 
FOR ALL DEVICES IN THE TEST QUE. THE END OF PASS REPORT IS AS FOLLOWS. 



•END OF PASS 



1 



THE FOLLOWING MESSAGE WILL ALSO OCCUR IF THERE WERE ERRORS SINCE 
THE LAST END OF PASS REPORT. 



TOTAL ERRORS SINCE LAST REPORT 



0' 



4.4 PERFORMANCE REPORT 



NO PERFORMANCE REPORTS ARE GIVEN DURING THE EXECUTION OF THE 
PROGRAM. 



4.5 PROGRAM HALTS 

THERE ARE NO SCHEDULED HALTS DURING THE EXECUTION OF THE PROGRAM . 
PROCESSOR HALTS ARE DUE TO THE TRAP CATCHER. 



4.6 ERROR REPORTS 

THE RM05/3/2 DISKLESS DIAGNOSTIC PROVIDES COMPREHENSIVE ERROR 
REPORTS INTENDED TO (1) AID IN FAULT RESOLUTION AND <2> MINIMIZE 
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229 REFERENCES TO PROGRAM LISTINGS. 

if? THE TIRST LINE OF THE ERROR REPORT CONTAINS THE NUMBER OF THE 

?3? UNIT (DRIVE) BEING TESTED, DRIVE TYPE, THE TEST NUMBER, THE ERROR 

233 NUMBER AND THE VALUE OF THE PROGRAM COUNTER WHERE THE ERROR WAS CALLED. 

234 THIS LINE IS FOLLOWED BY THE ERROR MESSAGE: SEVERAL LINES OF TEXT WHICH 

235 GIVE A COMPREHENSIVE DESCRIPTION OF THE ERROR, AND A LIST OF FAILING 

236 MODULES IN ORDER OF DECREASING PROBABILITY. THE ERROR MESSAGE IS 

237 NORMALLY FOLLOWED BY ONE OR MORE PAIRS OF LINES CONTAINING DATA HEADERS 

238 AND DATA PERTININEMT TO THE ERROR, INCLUDING EXPECTED AND ACTUAL TEST 

239 RESULTS. 

24? THE FOLLOWING PRINTOUT IS AN ERROR MESSAGE IN THIS PROGRAM: 

243 DRV* 0 - RM03. TEST* 23, ERR* 61, PC=017724 

244 INCORRECT ECC PATTERN GENERATED DURING WRITE 

245 PROBABLE FAULT <S) : 

246 (NOT INCLUDING CABLES OR CONNECTORS) 

247 IF MODULE, M8685, 

249 EXPECTED ECC RECEIVED ECC 

250 13117 175154 017677 003402 
251 

252 
253 

254 4.7 EXECUTION TIME 

255 

256 PASS 1 OF THE PROGRAM TAKES ABOUT 2 SECONDS. PASS 2 AND 

257 SUBSEQUENT PASSES TAKE 12 SECONDS. 
258 

259 

260 5.0 ENVIRONMENTAL SUPPORT 

262 5.1 PROCESSOR COMPATIBlLl Tr 

264 THE RM05/3/2 DISKLESS DIAGNOSTIC IS EXECUTABLE ON ANY PDP-11 

265 PROCESSOR. PROVIDING PREVIOUSLY MENTIONED HARDWARE REQUIREMENTS ARE 

266 MET. 

267 
268 
269 

270 5.2 DUAL PORT CONFIGURATIONS 

272 THE RM05/3/2 DISKLESS DIAGNOSTIC IS NOT EXECUTABLE ON RM05/3/2 

273 SUBSYSTEMS HAVING THE DUAL PORT OPTION UNLESS THE DUAL PORT SWITCH IS 

274 SET TO THE APPROPRIATE PORT (A OR B) AND NOT TO THE PROGRAMMABLE 

275 POSITION (A/8). 
276 

277 
278 

279 5.3 MEMORY PARITY HARDWARE 

280 

281 MEMORY PARITY HARDWARE WILL NOT BE USED C IRING THE EXECUTION OF 

282 THE RM05/3/2 DISKLESS DIAGNGOSTIC. 
283 

284 

285 
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5. A MEMORY MANAGEMENT HARDWARE 

MEMORY MANAGEMEN T HARDWARE WILL NO r BE USED DURING THE RM05/3/2 
DISKLESS DIAGNOSTIC. 



5.5 AC T 1 1 , APT11 COMPATIBILITY 

THE RM05/3/2 DISKLESS DIAGNOSTIC PROGRAM IS COMPATIBLE WITH AC T 1 1 
AND APT11 IN BOTH DUMP AND AUTOMATIC MODES. FURTHER, THE PROGRAM WILL 
EXECUTE A QUICK PASS DURING THE FIRST PASS IN SUPPORT OF QUICK VERIFY 
MODE. 



5.6 XXDP COMPATIBILITY 

THE RM05/3/2 DISKLESS DIAGNOSTIC PROGRAM IS COMPATIBLE WITH XXDP 
IN DUMP AND CHAIN MODES. 



5.7 OPERATING SYSTEM COMPATIBILITY 

THE PROGRAM IS NOT REQUIRED TO BE COMPATIBLE WITH ANY OPERATING 
SYSTEM. 



6.0 TEST DESCRIPTION 

THE PROGRAM IS DESIGNED IN A BOTTOM UP MANNER SUCH THAT EACH TEST 
GENERALLY USES A MORE COMPLEX SUBSET OF HARDWARE THAN THE PREVIOUS 
TEST. 

MODULE CALL0U7 IS PREDICATED ON THE ASSUMPTION THAT EARLIER TESTS 
HAVE BEEN COMPLETED WITHOUT ERROR AND THAT ERRORS ARE DUE TO SINGLE. 
NONTRANSJENT HARDWARE FAILURES. 

THE RM05/3/2 DISKLESS DIAGNOSTIC CAN BE EXECUTED USING AN RH70 
OR AN RH11 MASS8US CONTROLLER. 

UNLESS SPECIFIED BY THE OPERATOR OR BY THE ENVIRONMENT TABLE THE 
TEST IS REPEATED FOR EACH POSSIBLE DEVICE STARTING WITH DEVICE 0. 

THE MODULES WHICH MAY BE CALLED OUT DURING THE EXECUTION OF THE 
TEST ARE AS FOLLOWS: 

IF 
CS 
DS 

MASS8US MODULE 
THE RADIAL MODULE (RD) IS NOT TESTED BY THIS PROGRAM. 
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TEST 1 TRANSFER TEST 
PURPOSE : 

TO VERIFY THAT THE RM05/3/2 CAN COMPLETE A REGISTER TRANSFER 
ON THE MASS8US, AND IN PARTICULAR, TO VERIFY THAT "TRANSFER" IS NOT 
STUCK IN AN INACTIVE STATE. 



PROCEDURE : 



READS REMOTE 
CONTENTS AND 
A 'NONEXISTENT 



THE PROGRAM WRITES AND 
SELECTED DEVICE. REGISTER 
IGNORED. AND THE TEST FAILS IF 
BUS TIMEOUT OCCURRS FOR EVERY REGISTER ACCESS 
THE PROGRAM JUMPS TO THE END OF PASS HANDLER 
NEXT DEVICE TO BE TESTED. 

PROBABLE FAULT: 



REGISTERS FOR THE 
PARITY ERRORS ARE 
DEVICE ERROR" OR 
IF THE TEST FAILS 
WHICH SELECTS THE 



THE TEST FAILS IF THE SELECTED DEVICE IS NONEXISTENT OR IS 
SWITCHED TO THE PROGRAMMABLE POSITION OR TO THE ALTERNATE PORT. 
THE FOLLOWING FAULTS ARE APPLICABLE ONLY WHEN the DEVICE IS 
PRESENT AND IS SWITCHED TO THE APPROPRIATE PORT. 

1. IF MODULE 

2. ASYNCHRONOUS MASS8US MODULE 

3. CS MODULE 



TEST 2 CTOD TEST 
PURPOSE : 

TO VERIFY THAT DATA CAN BE TRANSFERRED TO AND FROM THE 
RM05/3/2 USING THE CONTROL BUS AND. IN PARTICULAR. TO VERIFY THAT 
"CONTROLLER TO DEVICE" HAS NOT FAILED. 

PROCEDURE: 

THE TEST WRITES ONES IN REMOTE REGISTERS THEN READS EACH 
REGISTER WHICH WILL WRITE ZEROS IN THE REGISTER IF "IF3 CTOD HOLD 
H" IS STUCK AT ONE. THE TEST THEN READS AS MANY REMOTE REGISTERS 
AS ARE NECESSARY TO OBTAIN ONE OR MORE ONE BITS. 



PROBABLE FAULT: 

1. IF MODULE 

2. ASYNCHRONOUS MASSBUS MODULE 
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TEST 



3 MASSBUS INITIALIZE TEST 
PURPOSE : 

TO VERIFY THAT THE MASS8US ADAPTER IS BEING 
THE MASS BUS. 

PROCEDURE: 



INITIALIZED BY 



USING CONTROLLER CLEAR TO INITIALIZE THE SELECTED UNIT, THIS 
TEST THEN READS MASSBUS ADAPTER REGISTERS TO VERIFY THAT AT LEAST 
ONE BIT IS CLEARED. MASSBUS ADAPTER REGISTERS ARE PRESET TO A 
NON ZERO VALUE PRIOR TO CONTROLLER CLEAR. 

PROBABLE FAULT: 

1. ASYNCHRONOUS MASSBUS MODULE 

2. IF MODULE 

3. CS MODULE 



TEST 4 CLEAR STUCK ACTIVE TEST 
PURPOSE : 

TO VERIFY THAT **BA CLR L" ON THE CS MODULE IS NOT STUCK IN 
AN ACTIVE STATE. 

PROCEDURE: 

CONTROLLER CLEAR IS USED TO INITIALIZE THE SELECTED UNIT. 
AFTER WHICH VS ARE WRITTEN IN ERROR REGISTERS 1 AND 2 AND 
MAINTENANCE REGISTER 1. IF ANY 1 BITS CAN 8E READ BACK THE TEST 
IS OK, ELSE, 'NBA CLR L" IS PROBABLY STUCK ACTIVE. 

PROBABLE FAULT: 

1 . CS MODULE 

2. IF MODULE 

3. ASYNCHRONOUS MASSBUS MODULE 
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TEST 5 TRI S TATE TRANSFER TEST 
PURPOSE : 

TO VERIFY THAT THE PATH TO AND FROM THE MASS8US ADAPTER 
TRI-STATE REGISTER BUS IS NOT STUCK AT ONE OR ZERO AND THAT EACH 
BIT POSITION IS INDEPENDENT. 

PROCEDURE: 

THIS TEST PRESETS MASS8US ADAPTER REGISTERS TO A NONZERO 
VALUE . THEN. ASSUMING THE REGISTERS ARE PRESET, IT CLEARS THEM 
USING A MOVE INSTRUCTION. THE TEST THEN READS AS MANY REGISTERS 
AS IS NECESSARY TO OBTAIN ONE OR MORE ZEROS FROM EACH BIT 
POSITION. 

THE TEST CLEARS MASS8US ADAPTER REGISTERS, THEN, ASSUMING 
THE REGISTERS ARE CLEARED, IT LOADS THEM WITH ONES AND READS AS 
MANY REGISTERS AS IS NECESSARY TO OBTAIN ONE OR MORE ONE BITS IN 
CACH BIT POSITION. 

FINALLY, THE TEST WRITES A SINGLE ONE BIT PATTERN IN BIT 0 
OF SELECTED REMOTE REGISTERS AND VERIFIES THAT THE PATTERN CAN BE 
READ BACK. THE ONE BIT IS SHIFTED AND THE TEST REPEATED FOR ALL 
BIT POSITIONS. 

PROBABLE FAULT: 

1. ASYNCHRONOUS MASSBUS MODULE 

2. IF MODULE 

3. CS MODULE 
A. DS MODULE 



TEST 6 REGISTER SELECT TEST 
PURPOSE : 

TO VERIFY THAT THE REGISTER SELECT LINES ARE NOT IN A STUCK 
POSITION. 

PROCEDURE: 

EACH REGISTER SELECT LINE IS TESTED BY WRITING ZEROS IN 
THOSE DEVICE REGISTERS FOR WHICH THF LINE MUST BE ZERO. THEN 
WRITING ONES IN THOSE DEVICE REGISTERS FOR WHICH THE LINE MUST BE 
ONE THE ZERO REGISTER IS READ BACK AND IF THE SELECT LINE IS 
STUCK AT ZERO THE ZERO REG STER WILL CONTAIN ONES . THE PROCESS 
IS REPEATED TO DETECT A STUCK AT ONE FAULT. EXCEPT I i THIS CASE . 
THE ONES REGISTER IS WRITTEN FIRST. 
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REGISTER SELECT LINES 1, 2. 4 AND 8 ARE TESTED IN THIS 
MANNER; SELECT LINE 16 IS EXPLICITLY TESTED IN THE ILR TEST . 

PROBABLE FAULT: 

1. IF MODULE 

2. ASYNCHRONOUS MASS8US MODULE 



TEST 7 DRIVE TYPE TEST 
PURPOSE : 

TO TEST THE "DRIVE TYPE" REGISTER, RMDT. 
PROCEDURE: 

, ™£ PROGRAM READS RMDT AND VERIFIES THAT THE RESULT 

CORRESPONDS TO A SINGLE PORT OR DUAL PORT RM05, RM03 OR RM02 DRIVE . 

PROBABLE FAULT: 
1. IF MOULE 



TEST 10 DEVICE AVAILABLE TEST 
PURPOSE : 

TO VERIFY THAT DEVICE AVAILA8LE STATUS IS SET. 
PROCEDURE : 

THE PROGRAM TESTS "DVA".BIT 11 OF RMCS1. 
PROBABLE FAULT: 
1. IF MODULE 



TEST 11 SEARCH TIMEOUT TEST 
PURPOSE : 

TO VERIFY THAT THE SEARCH TIMEOUT ONE SHOT SETS *t)PI". 
EXCEPT WHEN SEARCH TO DISABLE" IS ACTIVE. 
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S71 PROCEDURE : 

572 

573 WITH SEARCH TIMEOUT DISABLED. THE TEST EXECUTES A DATA 

574 COMMAND TO THE POINT WHERE 'T» ENABLE SEARCH" IS ASSERTED. 

575 AFTER WAITING A SUFFICIENT PERIOD AND VERIFYING THAT OPI 

576 IS NOT SET. THE TEST ENABLES SEARCH TIMEOUT AND VERIFIES 

577 THAT OPI SETS. 
578 

579 PROBABLE FAULT: 

580 

581 1. CS MODULE 

582 

583 NOTE: IT IS ASSUMED THAT THE "SET OPI TEST" HAS 

58* ALREADY PASSED. THUS MAKING THE IF MODULE 

585 AN IMPROBABLE FAULT. 

586 

587 

588 

589 

590 

591 TEST 12 SET DTE TEST 

592 

593 PURPOSE : 

594 

595 IN ADDITION TO VERIFYING THAT 'DRIVE TIMING ERROR" CAN 

596 BE SET BY THE CS MODULE. THIS TEST ALSO VERIFIES 
597 

598 * THAT 'MAINTENANCE SECTOR COMPARE" IS NOT STUCK AT ONE 

599 OR ZERO. 
600 

601 * THAT "ENABLE SEARCH" IS NOT STUCK AT ONE OR ZERO. 

602 

603 PROCEDURE: 
604 

605 (1) INITIALIZE AND VERIFY THAT "DTE" IS RESET. THEN 

606 SET MAINTENANCE INDEX PULSE AND VERIFY THAT DTE IS STILL 

607 RESET. THIS TEST WILL INSURE THAT THE SECTOR COMPARE FLOP 

608 IS NOT STUCK AT ONE. 
609 

610 (2) EXECUTE A DATA COMMAND IN MAINTENANCE MODE TO 

611 THE POINT WHERE SEARCH IS ENABLED. I.E.. P EN SEARCH H IS 

612 IS ACTIVE. SET AND RESET THE SECTOR PULSE TO SET "CS3 EN 

613 SEARCH" FLOP. AND CLOCK "CSS SECTOR COMPARE" FLOP WHICH 

614 SHOULD NOT SET. SET SECTOR PULSE AND VERIFY THAT DTE IS 

615 RESET. THIS TEST FAILS IF J INPUT TO SECTOR COMPARE FLOP 

616 IS STUCK AT ONE. 
617 

618 REPEAT, BUT SET MAINTENANCE SECTOR COMPARE AND VERIFY 

619 THAT DTE SETS. THIS TEST FAILS IF MAINTENANCE SECTOR 

620 COMPARE IS STUCK AT ZERO. 
621 

622 PROBABLE FAULT: 

623 

624 1. CS MODULE 

625 

626 2. OS MODULF 

627 



631 

652 TEST 13 FORMAT CHANGE TEST 

til PURPOSE : 

£12 TO VERIFY THAT A CHANGE IN FORMAT INHIBITS SFARCH 

637 ENABLE UNTIL THJE NEXT INDEX PULSE. 

638 

639 PROCEDURE: 

J£? THE TEST URL USE "DTE" FOR VISIBILITY OF "CS3 EN 

6A2 SEARCH H". 

THE FOLLOWING STEPS ARE EXECUTED: 

INITIALIZE AND SET THE FORMAT TO 18 BIT MODE 

64° TO SET "CS3 FMT CHANGE" FLOP. 

J£q (2) EXECUTE A DATA COMMAND TO THE POINT WHERE SEARCH 

650 IS ENABLED BY THE SEQUENCER. 

65P (3) SET 'MAINTENANCE SECTOR COMPARE". THEN SET 

lli ' MAINTENANCE SECTOR PULSE" TO CLOCK "CS3 EN SEARCH" FLOP 

HI WHICH SHOULD NOT SET BECAUSE OF THE FORMAT CHANGE. 

£t| ,4) RESET SECTOR PULSE TO CLOCK "CS5 SECTOR COMPARE" 

657 , FLOP WHICH WILL NOT SET IF "CS3 EN SEARCH H IS INACTIVE. 

65§ (5) SET SECTOR PULSE AND VERIFY THAT DRIVE TIMING 

660 ERROR IS RESET. 

66? (6) SET AND RESET INDEX PULSE TOCLEAR THE FORMAT 

663 CHANGE FLOP. 

665* (7) SET AND RESET SECTOR PULSE TO SET "tS3 EN SEARCH" 

666 FLOP AND "CSS SECTOR COMPARE" FLOP. 

668 <8> SET SECTOR COMPARE AND VERIFY THAT DTE IS SET. 

J$0 REPEAT THE TEST WITH A FORMAT CHANGE FROM 18 BIT MODE 

671 TO 16 BIT MODE. 

67? 

673 PROBABLE FAULT: 

675 1. CS MODULE 

676 

677 

678 

679 

680 

681 TEST H PROM STROBE TEST 

683 PURPOSE : 
684 
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685 
686 
687 



690 

691 

692 

693 

694 

695 

696 

697 

698 

699 

700 

701 

70? 

703 

704 

705 

706 

707 

708 

709 

710 

711 

712 

713 

714 

715 

71b 

717 

718 

719 

720 

721 

722 

723 

724 

725 

726 

727 

728 

729 

730 

731 

732 

733 

734 

735 

736 

737 

738 

739 

740 

741 
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TO VERIFY THAT WORD CLOCK AND PROM STR08E CAN BE MANIPULATED 
IN MAINTENANCE MODE. 

PROCEDURE: 

INITIALIZE AND SET 16 BIT MODE, THEN SEQUENCE *»E 
MAINTENANCE CLOCK UNTIL PROM STROBE SETS. ISSUE — MORE 
MAINTENANCE CLOCK PULSES AND VERIFY T HAT PROM STROBE RESETS. 

PROBABLE FAULT: 

1. CS MODULE 

2. DS MODULE 



TEST 15 SYNC WORD COUNT INHIBIT TtST 
PURPOSE : 

TO VtRIFY THE FOLLOWING DURING READ COMMAND : 
THAT "CS4 P LFS" (LOOKING FOR SYNC) GOES ACTIVE. 
• THAT 'BOOKING FOR SYNC" INHIBITS THE WORD COUNT 
PROCEDURE : 

A READ COMMAND IS SETUP AND EXECUTED TO THE POINT 
WHERE "LOOKING FOR SVNC" SHOULD BE ACTIVE. WITH THE 
PROGRAM VERIFYING THE TRANSITION OF THE SIGNAL. THE 
PROGRAM THEN SUPPLIES A SERIES OF BIT CLOCKS AND VERIFIES 
THAT 'WW* STROBE" NEVER GOES ACTIVE. 

PROBABLE FAULT: 

1. CS MODULE IF LFS FAILS, 

2. DS MODULE IF PROM STROBE FAILS. 



TEST 16 SYNC DETECTION TEST 
PURPOSE : 

TO VERIFY THAT THE APPROPRIATE SYNC PATTERN Ii 
RECOGNIZED. 

PROCEDURE : 

THE TEST EXECUTES A READ COMMAND IN MAINTENANCE MODE. 
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742 USING BIT 10 OF THE MAINTENANCE REGISTER (RMMR1) TO SIMULATE 

743 THE SYNC 81 T STREAM, AND USING PROM STR08E TO DETERMINE 
?44 If THE SYNC PATTERN HAS BEEN DETECTED. 

745 

746 THE SYNC PAT T ERN IS 00011001, WITH THE LEFT MOST 

747 BIT REPRESENTING THE LAST BIT OF THE STREAM. 
748 

749 PROBABLE FAULT: 

750 

751 1. DS MODULE 

752 

753 2. CS MODULE 

754 

755 

756 

757 

758 

759 TEST 17 ABORT SYNC DETECTION TEST 

760 

761 PURPOSE : 

762 

763 TO VERIFV THAT 'UORD COUNT INHIBIT" IS RESET IF A 

764 'DRIVE TIMING ERROR" OCCURS DURING SYNC DETECT ;0N. 
765 

766 PPOCEDURE : 

767 

768 A READ COMMAND IS INITIATED IN MAINTENANCE MODE. WHEN 

769 "LOOKING FOR SYNC" GOES ACTIVE. THE TEST FORCES A DRIVE 

770 TIMING ERROR AND USES PROM STROBE TO VERIFY THAT 'W)RD 

771 COUNT INHIBIT" HAS BEEN RESET. 

772 

77 i PROBABLE FAULT: 

774 

775 1. DS MODULE 

776 

777 

778 

779 

780 

781 TEST 20 SYNC GENERATION TEST 

782 

783 PURPOSE : 

784 

785 TO VERIFY THAT THE APPROPRIATE SYNC PATTERN IS 

786 GENERATED DURING A FORMAT OPERATION. 
787 

788 PROCEDURE : 

789 

790 THE TEST EXECUTES A WRITE HEADER AND DATA COMMAND 

791 IN MAINTENANCE MODE. AND VERIFIES THAT THE CORRECT SYNC 

792 PATTERN IS GENERATED BY MONITORING WRITE DATA AT THE MAIN- 

793 TENANCE REGISTER (RMMR1). 
794 

795 PROBABLE FAULT: 

796 

797 1. DS MODULE 

798 
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799 
800 
801 
802 

803 TEST 21 WRITE HEADER TEST 

804 

805 PURPOSE : 

806 

807 TO TEST THE OPERATION OF (1) THE DATA SUFFER AND SHIFT 

808 REGISTER AS WELL AS <2> THE ECC GENERATION DURING WRITE. 
809 

810 PROCEDURE: 
811 

81? A WRITE HEADER AND DATA COMMAND IS EXECUTED IN MAINTENANCE 

813 MODE . THE TEST VERIFIES HEADER WORDS ONE AND TWO AND THE 

814 CRC CHARACTER USING THE WRITE DATA BIT OF THE MAINTENANCE 

815 REGISTER. 
816 

817 AN RM02/3 USES CYLINDER 822., TRACK 4., SECTOR 31. AND 

818 16 BIT FORMAT FOR THE TEST. WHICH CORRESPONSE TO THE FOLLOWING: 
819 

820 HEADER: 
821 

822 WORD 1 - 1101001100110110 

824 WORD 2 - 0000010000011111 

825 

826 AN RM05 USES CYLINDER 822., TRACK 18., SECTOR 31. AND 

827 16 BIT FORMAT FOR THIS TEST. WHICH CORRESPONSE TO THE FOLLOWING: 

828 

829 HEADER: 
830 

831 WORD 1 - 1101001100110110 

833 WORD 2 - 0001001000011111 

834 

835 PROBABLE FAULT: 

836 

837 1. DS MODULE OR MASSBUS MODULE 

838 
839 
840 
841 
842 

843 TEST 22 HEADER COMPARE TEST 

844 

845 PURPOSE : 

846 

847 TO CHECK THE OPERATION OF (1) THE SHIFT REGISTER AND 

848 DATA BUFFER AS WELL AS THE (2) CRC GENERATOR DURING 

849 READ. 

850 

851 PROCEDURE: 
852 

853 THE TEST EXECUTES A READ HEADER AND DATA COMMAND IN 

854 MAINTENANCE MODE USING BIT 10 OF THE MAINTENANCE REGISTER 

855 (RMMRD TO SIMULATE THE DATA BITS 'OR THE FIRST AND SECOND 
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856 

857 

858 

859 

860 

861 

862 

863 

864 

865 

866 

8o7 

868 

869 

870 

877 

872 

873 

874 

875 

876 

877 

878 

879 

880 

881 

882 

883 

884 

885 

886 

88/ 

888 

889 

890 

891 

892 

893 

894 

895 

896 

897 

898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
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HEADER WORDS AS WELL AS THE CRC CHARACTER. THE CRC CHARACTER IS 
IS FAULTED, AND THE TEST VERIFIES THAT A CRC ERROR IS DETECTED. 
ADDITIONALLY, THE TEST VERIFIES THAT HEADER WORDS ONE AND TWO 
ARE CORRECTLY TRANSFERD TO MEMORY. 

THE TEST USES THE SAME HEADER AS IN THF. PREVIOUS TEST EXCEPT 
THAT BIT 15 IS INVERTED. 

PR08A8LE FAULT: 

1. DS OR IF MODULE IF CRC ERROR NOT DETECTED; 

2. DS OR MASS8US MODULE IF DATA INCORRECT 



TEST 23 ECC GENERATION TEST 
PURPOSE : 

TO CHECK ECC OPERATION DURING WRITE. 

PR0C1DURE: 

A WRITE DATA COMMAND IS EXECUTED IN MAINTENANCE 
MODE. ALL ONES DATA FIELD IS USED, AND THE TEST VERIFIES 
THE ECC CHARACTER VIA THE WRITE DATA SIT OF THE MAINTENANCE 
REGISTER. THE DATA FIELD IS NOT VERIFIED. 

PROBABLE FAULT: 

1. DS MODULE 



TEST 24 ECC DETECTION TEST 
PURPOSE : 

TO CHECK THE ECC GENERATION DURING READ. 
PROCEDURE : 

THE TEST EXECUTES A READ DATA COMMAND IN MAINTENANCE 
MODE. AN ALL ONES DATA FIELD IS USED. HOWEVER THE LAST DATA 
WORD IS FAULTED. 

THE TEST VERIFIES (1) THAT AN ECC ERROR IS DETECTED 
AND THAT (2) THE POSIT 'ON AND PATTERN REGISTERS ARE VALID. 

PROBABLE FAULT: 

1. DS MODULE 
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6^ 



f>80 



68l 
682 



oonoo 

104000 
000004 



000011 
000012 
000015 
000200 
177776 
1 77776 
17777<* 
1 77772 
177570 
177570 



000000 
000001 
000002 
000003 
00000*. 



EQ 001<v 



.••LAST REVISION 04-4PR-81 

TITLE CZRMQ80 RM05/3/2 DSKLS TST 2 
COPYRIGHT (C) 1981 
DIGITAL EQUIPMENT CORPORATION 
COLORADO SPGS.. CO. 80919 

PROGRAM BY MIKE LEAVITT 

THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAJNDEC SYSMAC 
PACKAGE fMAINDEC-11-DZQAC-C5). 1R-MAP-81 

SBTTL OPERATIONAL SWITCH SETTINGS 



SWITCH 

*"l5 " 

H 
13 
11 
10 

9 

8 

7 

6 

5 

A 

3 

2 

1 

0 



USE 



HALT ON 

LOOP ON 

INHIBIT 

INHIBIT 

BELL ON 

LOOP ON 

LOOP ON 

TN128 

TN64 

TN32 

TN16 

TN8 

TN4 

TN2 

TNI 



ERROR 
TFST 

ERROR TYPE OUTS 

ITERATIONS 

ERROR 

ERROR 

TEST IN SWR<7:0> 



.SBTTL BASIC DEFINITIONS 



.•INITIAL ADDRESS 
STACK = 1100 
ERROR = tMT 
SCOPE = IOT 



OF THE STACK POINTER ••• 1100 ••• 



; .-BASIC 
;;BASIC 



DEFINITION 
DEFINITION 



OF 
OF 



ERROR 
SCOPE 



CALL 
CALL 



.-•MISCELLANEOUS DEFINITIONS 



HT 
LF 
CR 

CRLF 
PS 

PSW=PS 

STKLMT 

PJRO 

DSWR 

DDISP 



RO 
R1 
R2 
R3 



'GENERAL 



11 
12 
15 
200 
177776 

\7777k 
1 77772 
177570 
177570 

PJRPOSE 

20 

11 

12 

XI 

X4 



CODE FOR HORIZONTAL TAB 
CODE FOR LINE FEED 
CODE FOR CARRIAGE RETURN 
CODE FOR CARRIAGE RETURN-LINE FEED 
PROCESSOR STATUS WORD 

STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 



REGISTER DEFINITIONS 

.GENERAL REGISTER 
; GENERAL REGISTER 
.'GENERAL REGISTER 
.•GENERAL REGISTER 
.'GENERAL REGISTER 



'^MCBC *M05/V2 OSKLS 
BA 'j I IE? INI T IONS 



000005 
000006 
000007 
000006 
000007 



000000 
000040 
000100 
OCOHO 
000200 
000240 
000300 
000340 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
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R5 
R* 
R7 
SP 
PC 
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= X5 
= Xt 
= X7 
= Xt 
= X? 



.-•PRIORITY LEVEL 

PRO = 0 

PR1 = 40 

PR2 = 100 

PR 3 = 140 

PR4 = 200 

PR 5 = 240 

PR6 = 300 

PR 7 = 340 



GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
STACK POINTER 
PROGRAM COUNTER 



DEFINITIONS 

PRIORI TY LEVEL 0 

PRIORITY LEVEL 1 

PRIORITY LEVEL 2 

PRIORITY LEVEL 3 

PRIORITY LEVEL 4 

PRIORITY LEVEL 5 

PRIORITY LEVEL 6 

PRIORITY LEVEL 7 



.-•"SWITCH REGISTER" 
SU15 = 100000 
SUM 4 = 40000 
SUM 3 = 20000 
SUM 2 = 10000 
SW11 = 4000 
SUMO = 2000 
SW09 = 1000 
Sy08 = 400 
SW07 = 200 
SW06 = 100 
SW05 = 40 
SW04 = 20 
SW03 = 10 
SW02 = 4 
SW01 = 2 
SUOO = 1 
SW9=SW09 
SW8=SW08 
SU7=SW07 
SW6=SW06 
SU)5=SW05 
SW4=SW04 
SW3=SW03 
SU2=SW02 
SU=SW01 
SW0=SW00 



; *DATA BIT DEFINITIONS 

BIT 15 = 100000 

BIT14 = 40000 

Bin 3 = 20000 

BJT12 = 10000 

BIT11 = 4000 

BIT10 = 2000 

BIT09 = 1000 

BIT08 = 400 

BIT07 = 200 

BIT06 = 100 

BJT05 = 40 

BIT04 = 20 



SWITCH DEFINITIONS 



(BI TOO TO 8IT15) 
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bal: definitions 

0000' 0 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000004 
000010 
000014 
000014 
000014 
000020 
000024 
000030 
C00034 
000060 
000064 
000240 

683 
684 
685 
686 
687 

688 004000 

689 000040 

690 000020 

691 000010 

692 000004 

693 000002 

694 000001 

695 000077 
696 

697 

698 000000 

699 000002 

700 000004 

701 000006 

702 000010 

703 000012 

704 000014 

705 000016 

706 000020 

707 000022 

708 000022 

709 000024 

710 000026 
^ 1 000030 
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BIT03 

BIT02 

BIT01 

BITOO 

BIT9=BI 

BIT8=BI 

BIT 7=81 

BIT6=8I 

BIT5=BI 

BIT4=BI 

BIT3=8J 

BIT2=8I 

BIT 1=81 

BIT0=8I 

.♦BASIC 

ERRVEC 

RESVEC 

TBI TVEC 

TRTVEC 

BPTVEC 

I0TVEC 

PWRVEC 

EMTVEC 

TRAPVEC 

TKVEC 

TPVEC 

PIRQVEC 



= 10 
= 4 
= 2 
= 1 
T09 
T08 
T07 
T06 
T05 
T04 
T03 
T02 
T01 
TOO 

"CPU" 
= 4 
= 10 
= 14 
= V 
= 14 
= 20 
= 24 
= 30 
= 34 
= 60 
= 64 
= 240 



TRAP VECTOR ADDRESSES 

TIME OUT AND OTHER ERRORS 
: RESERVED AND ILLEGAL INSTRUCTIONS 

•:v BIT 

TRACE TRAP 

; BREAKPOINT TRAP (8PT) 
INPUT/OUTPUT TRAP (I0T) ••SCOPE*" 
POWER FAIL 

I EMULATOR TRAP (EMT) ••ERROR* • 
"TRAP" TRAP 
TTV KEYBOARD VECTOR 
TTV PRINTER VECTOR 
;PROGRAM INTERRUPT REQUEST VECTOR 



.SBTTL RM REGISTER BIT DEFINITIONS 



;*RMCS1 CONTROL STATUS REGISTER 



DVA 

F4 = 
F3 

F2 

F1 = 
FO 

GO » 

FNCMSK = 

.•FUNCTION 

NOP = 

ILF02 = 
SEEK 

RECAL = 

DRVCLR = 

RLEASE = 

OFFSET = 
RTC 
RIP 

PAKACK = 

PACACK = 

ILF24 = 

ILF26 - 

SEARCH = 



BIT11 
BIT05 
BI T04 
BIT03 
BIT02 
BIT01 
BITOO 
000077 

CODES (BITS 01- 

000000 

000002 

000004 

000006 

000010 

0000 i 2 

000014 

000016 

000020 

000022 

PAKACK 

000024 

000026 

000030 



DEVICE AVAILABLE-READ ONLY 

FUNCTION CODE 

FUNCTION CODE 

FUNCTION CODE 

FUNCTION CODE 

FUNCTION CODE 

GO BIT 

FUNCTION CODE MASK 



•05 OF RMCS1) 

NOP COMMAND 
ILLEGAL COMMAND 
SEEK COMMAND 
RECALIBRATE COMMAND 
DRIVE CLEAR COMMAND 
RELEASE COMMAND 
OFFSET COMMAND 
RETURN TO CENTERLINE COMMAND 
READ IN PRESET COMMAND 
PACK ACKNOWLEDGE COMMAND 

ILLEGAL COMMAND 
ILLEGAL COMMAND 
SEARCH COMMAND 
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714 


000030 


ILF30 


= 


000030 




000032 


ILF32 


= 


000032 




000034 


ILF34 


= 


000034 




000036 


ILF36 


= 


ft ft ft ft y 

000036 




000040 


ILF40 


= 


/» ft ft ft * A 

000040 




000042 


ILF42 




ft ft a ft / ""k 

000042 




000044 


ILF44 


= 


ft a /\ ft / / 

000044 




000046 


ILF46 




ft ft ft ft / / 

000046 


715 


000050 


WCD 


- 


ft ft ft ft C ft 

000050 


716 


000052 


WCH 


- 


ft ft ft ft F ft 

000052 


717 


000054 


ILF54 


- 


ft ft ft ft f / 

000054 


718 


000056 


ILF56 




ft ft ft ft C 1 

000056 


719 


000060 


WD 


= 


ft ft ft ft £ ft 

000060 


720 


000062 


WH 


— 


ft ft ft ft y- ft 

000062 


72 T 


000U64 


JLF&4 




UUUUo*» 


722 


000066 


ILF66 




000066 


723 


000070 


RD 




000070 


724 


000072 


RH 




000072 


725 


000074 


ILF74 




000074 


726 


0C0076 


ILF76 




000076 



727 
728 
7^9 
730 
731 
732 
733 
734 
735 
736 
737 
73* 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 



010000 
004000 
002000 
001000 
000400 



000020 
000010 
000004 
000002 
000001 



1 77400 
000377 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000001 



; *RMDA DJSK ADDRESS REGISTER 



; TRACK 
TA16 
TA8 
TA4 
TA2 
TA1 

; SEC TOR 

SA16 

SA8 

SA4 

SA2 

SA1 

; TRACK 
TADMSK 
SADMSK 



ADDRESS DEFINITIONS 
= BIT12 
= BJT11 
= 8IT10 
= BIT09 
= BIT08 



ADDRESS 
= BJT04 
= BIT03 
= BIT02 
= BIT01 
= BITOO 



S SECTOR MASKS 
= 177400 
= 000377 



DEFINITIONS 



;*RMDS DRIVE STATUS REGISTER 



ATA 

ERR 

PIP 

MOL 

URL 

L8T 

PGM 

DPR 

DRY 

VV 

OM 



BIT15 
BIT14 
BIT13 
BIT12 
BIT11 
BIT10 
BIT09 
BIT08 
BIT07 
BIT06 
BITOO 



; «RMER1 ERROR REGISTER #1 



ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

WRITE CHECK DATA COMMAND 

WRITE CHECK HEADER AND DATA 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

WRITE DATA COMMAND 

WRITE HEADER AND DATA COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 

READ DATA COMMAND 

READ HEADER AND DATA COMMAND 

ILLEGAL COMMAND 

ILLEGAL COMMAND 



TRACK ADDRESS 16. 
TRACK ADDRESS 8. 
TRACK ADDRESS 4 
TRACK ADDRESS 2 
TRACK ADDRESS 1 



SECTOR ADDRESS 16. 
SECTOR ADDRESS 8. 
SECTOR ADDRESS 4 
SECTOR ADDRESS 2 
SECTOR ADDRESS 1 



; TRACK ADDRESS MASK 
.SECTOR ADDRESS MASK 



ATTENTION ACTIVE 
COMPOSITE ERROR 
POSITIONING IN PROGRESS 
MEDIUM ON LINE 
WRITE LOCK 

LAST BLOCK TRANSFERRED 

PROGRAMMABLE 

DRIVE PRESENT 

DRIVE READY 

VOLUME VALID 

OFFSET MODE ACTIVE 
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SEQ 002? 



764 


100000 


DCK 




BJT15 


DATA CHECK ERROR 


765 


040000 


UNS 




BJT14 


DRIVE UNSAFE 


766 


020000 


OP I 


= 


BIT13 


OPERATION INCOMPLETE 


767 


010000 


DTE 


= 


BIT12 


DRIVE TIMING ERROR 


768 


004000 


WLE 


s 


BIT11 


WRITE LOCK ERROR 


769 


002000 


IAE 


= 


8J no 


INVALID ADDRESS ERROR 


770 


001000 


AOE 


- 


BIT09 


ADDRESS OVERFLOW ERROR 


771 


000400 


HCRC 


- 


8IT08 


HEADER CRC ERROR 


772 


000200 


HCE 


- 


BIT07 


•HEADER COMPARE ERROR 
;ECC 'WARD" ERROR 


773 


000100 


ECH 


z 


BJT06 


774 


000040 


UCF 




BIT05 


■WRITE CLOCK FAJLUf r 


775 


000020 


FER 




BIT04 


•FORMAT ERROR 


776 


000010 


PAR 




BIT03 


PARITY ERROR 


777 


000004 


RMR 




BJT02 


•REGISTER MODIFICATION REFUSED 


778 


000002 


ILR 




BJT01 


; ILLEGAL REGISTER 


779 


000001 


ILF 




BJTOO 


.•ILLEGAL FUNCTION 



780 
781 
782 
783 
784 
735 
786 
787 
788 
789 
790 
791 
792 
793 
794 
79b 
796 
797 

798 

799 

800 

801 

802 

803 

804 

805 

806 

807 

808 

809 

810 

811 

812 

813 

814 

815 

816 

817 

818 

819 

820 



115760 



000377 



002000 
001000 
000400 
000200 
000100 

003700 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
OC0400 
000200 
000100 
000040 
000010 
000004 
000002 
000001 



100000 
040000 



NDTMSK = DCK!DTE!WLE!AOE!HCRC!HCE!ECH!WCF JFER 

;'NDTMSK" IS USED TO MASK ERROR REGISTER 1 DURING NON - DATA 

; COMMANDS , I.E.. HOUSEKEEPING AND POSITIONING COMMANDS 



; *RMAS ATTENTION SUMMARY REGISTER 



ATNMSK 



377 



•RMLA LOOK AHEAD REGISTER 



SC4 
SC3 
SC2 
SCI 
SCO 



BIT10 
BIT09 
BIT08 
BIT07 
BIT06 



SCTMSK = 003700 

; *RMMR1 MAINTENANCE REGISTER *1 



.-WRITE 

D6CK 

DBEN 

DEBL 

MSEN 

MCLK 

MRD 

MUR 

MOC 

MSER 

MDF 

MS 

MWP 

MI 

MSC 

DMD 

;READ 

OCC 
RG 



ONLY BITS 
= BIT15 
= BIT14 
= 8JT13 
= BIT12 
= BJT11 
= BIT10 
= BIT09 
= 8IT08 
= BIT07 
= BIT06 
= BIT05 
= BIT03 
= BIT02 
= BIT01 
-- BITOO 

ONLY BITS 
= BIT15 
= BIT14 



.-MASK FOR ATTENTION BITS 



SECTOR COUNT = 16 

SECTOR COUNT = 8 

SECTOR COUNT = 4 

SECTOR COUNT = 2 

SECTOR COUNT = 1 

.•SECTOR COUNT MASK 



DEBUG CLOCK 

DEBUG CLOCK ENABLE 

DIAGNOSTIC END OF BLOCK 

SEARCH TIMEOUT ENABLE 

MAINTENANCE CLOCK 

READ DATA 

UNIT READY 

ON CYLINDER 

SEEK ERROR 

DRIVE FAULT 

SECTOR PULSE 

WRITE PROTECT 

INDEX PULSE 

SECTOR COMPARE 

DIAGNOSTIC MODE 



.•OCCUPIED 
.-RUN AND GO 



rZRMQBO RM05/3/2 DSKLS T ST 2 
R" REGISTER BIT DEFINITIONS 
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SEO 002*. 



821 

822 

823 

824 

825 

826 

82? 

828 

829 

830 

831 

812 

833 

834 

835 

836 

837 

838 

839 

840 

841 

842 

843 

844 

845 

846 

847 

848 

849 

850 

851 

852 

853 

8>4 

855 

856 

857 

858 

859 

860 

861 

862 

863 

864 

865 

866 

867 

868 

871 



020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
051401 



100000 
040000 
020000 
004000 

020024 
C24024 



010000 
004000 
002000 
000200 
161577 



001 777 
176000 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 



E8L = BJT13 

REX = BJT12 

ESRC = BIT11 

PLFS = B1T10 

6CRC = BJT09 

PDA = BIT08 

PHA = BIT07 

CONT = BIT06 

UC - BIT05 

EECC = BJT04 

MWD = BIT03 

IS = BIT02 

1ST = BIT01 

DMD = BITOO 

MR1 AAA = DMD!MUR!D8EN!M0C IMSEN 

; »RMDT DRIVE TYPE REGISTER 



NSA 
TAP 
MOH 
DRQ 



= BIT15 
= BIT14 
= B1T13 
= BIT1 1 



SNGPRT = 020024 
DULPRT = 024024 

;*RMOf OFFSET REGISTER 



FMT16 

ECI 

HCI 

OFD 

XNUOF 



BJT12 
BIT11 
BIT10 
BIT07 
161577 



END Or BLOCK 

EXCEPTION 

ENABLE SEARCH 

LOOKING FOR SYNC 

ENABLE CRC OUT 

DATA AREA 

HEADER AREA 

CONTINUE 

WORD CLOCK 

ENABLE ECC OUT 

WRITE DATA BIT 

LAST SECTOR 

LAST SECTOR AND TRACK 

DIAGNOSTIC MODE 



NOT SECTOR ADDRESSED = 0 

TAPE DRIVE = 0 

MOVING HEAD = 1 

DRIVE REQUEST REQUIRED 

.SINGLE PORT DRIVE TYPE 
.-DUAL PORT DRIVE TYPE 



16 BIT WORD FORMAT 
ECC INHIBIT 

HEADER COMPARE INHIBIT 
OFFSET FORWARD 
UNSED BITS OF RMOF 



; *RMDC DESIRE •> CYLINDER ADDRESS REGISTER 



CYLMSK = 001777 
XNUDC = 176000 

.•RMMR2 MAINTENANCE REGISTER *2 



.MASK FOR CYLINDER ADDRESS 
; UNSED BITS OF RMDC 



.READ 

RQA 

RQ8 

TAG 

TST 

CC 

CH 

8609 
B608 
BB07 
B806 
B805 
B804 
B803 
8802 
8801 



ONLY BITS 
- BIT1 5 

= 81 TH 
b> 15 

= 6! ' i? 

= Bini 

= BIT10 
= BIT09 
= BIT08 
= BIT07 
= BIT06 
= BIT05 
= BIT04 
= 8IT03 
= BIT02 
= BIT01 



PORT A REQUEST 
PORT B REQUEST 
TAG CONTROL 
COMMAND SEQUENCE 



CONTROL 
CONTROL 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 
TAG BUS 



TEST BIT 
OR CYLINDER TAG 
OR HEAD TAG 



CZRMQBO RM05/3/2 DSKLS T ST 2 
RM REGISTER BIT DEFINITIONS 
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5EO 0025 



872 

873 

874 

875 

876 

877 

878 

879 

880 

881 

832 

883 

884 

885 

886 

887 

888 

889 

890 

891 

892 

893 

894 

895 

896 

897 

898 

899 

900 

901 

90? 

903 

904 

905 

906 

907 

910 



911 
91? 
913 
914 
915 
916 
917 
918 



000001 



100000 
040000 
020000 
010000 
004000 
002000 
000200 
000010 
001567 



100000 
040000 



000000 
000006 
000012 
000014 
000016 
000020 
000024 
000026 
000030 
000032 
000034 
000036 
000040 
000042 
000044 
000046 
000050 
000052 
000054 
000056 
000060 
000062 
000064 
000066 
000070 
000072 
000074 
000076 



000077 



BBOO = BITOO 

; *RMER2 ERROR REGISTER ? 



BSE 
SKI 
OPE 
IVC 
LSC 
LBC 
DVC 
DPF 

XNUER2 



BIT15 
B1T14 
BIT13 
BIT12 
BJT11 
BIT10 
BIT07 
BIT03 
001567 



, SBTTL PROGRAM MNEMONICS 



MSE 
JSE 



= BJT15 
= BIT14 



; TAG BUS 



BAD SECTOR ERROR 
SEEK INCOMPLETE 
OPERATOR PLUG ERROR 
INVALID COMMAND ERROR 
LOSS OF SYSTEM CLOCK 
LOSS OF BIT CLOCK 
DEVICE CHECK 
DATA PARITY ERROR 
UNSED BITS OF RMER2 



.-MANUFACTURING DETECTED SECTOR ERROR 
;USER DETECTED SECTOR ERROR 



. S8TTL RM REGISTER INDEX VALUES 



RMCS1 


- 


00 


RMDA 




06 


RMDS 


— 


12 


RMER1 




14 


RMAS 




16 


RMLA 




20 


RMMR1 




24 


RMDT 




26 


RMSN 




30 


RMOF 




32 


RMDC 




34 


RMHR 




36 


RMMR2 




40 


RMER2 




42 


RMEC1 




44 


RMEC2 




46 


ILRG50 




50 


ILRG52 




52 


ILRG54 




54 


ILRG56 




56 


ILRG60 




60 


ILRG62 




62 


ILRG64 




64 


ILRG66 




60 


ILRG70 




70 


ILRG72 




72 


ILRG74 




74 


ILRG76 




76 


JDXMSK 




77 



CONTROL STATUS REGISTER #1 
DISK ADDRESS REGISTER 
DRIVE STATUS REGISTER 
ERROR REGISTER #1 
ATTENTION SUMMARY REGISTER 
LOOK AHEAD REGISTER 
MAINTENANCE REGISTER 
DRIVE TYPE REGISTER 
SERIAL NUMBER REGISTER 
OFFSET REGISTER 
DESIRED CYLINDER REGISTER 
HOLDING REGISTER 
MAINTENANCE REGISTER #2 
ERROR REGISTER #2 
ECC POSITION REGISTER 
ECC PATTERN REGISTER 
ILLEGAL REGISTER 50 
ILLEGAL REGISTER 52 
ILLEGAL REGISTER 54 
ILLEGAL REGISTER 56 
ILLEGAL REGISTER 60 
ILLEGAL REGISTER 62 
ILLEGAL REGISTER 64 
ILLEGAL REGISTER 66 
ILLEGAL REGISTER 70 
ILLEGAL REGISTER 72 
ILLEGAL REGISTER 74 
ILLEGAL REGISTER 76 



;MASK FOR REGISTER INDEX NUMBER 



. SBTTL RH CONTROLLER REGISTER BIT DEFINITIONS 
;*RMCS1 CONTROL STATUS REGISTER #1 



CZRMQBO RM05/3/2 DSKLS TST 2 MACRO V04.00 
RH CONTROLLER REGISTER BIT DE C INITIONS 



919 

920 

921 

922 

923 

924 

925 

926 

927 

928 

929 

930 

931 

932 

933 

934 

935 

936 

937 

938 

939 

940 

941 

942 

945 



946 

947 

948 

949 

950 

951 

952 

953 

954 

955 

956 

957 

958 

959 

960 

961 

962 

963 

964 

965 

966 

967 

968 

969 

970 

971 

972 

973 

974 

975 



100000 
040000 
020000 
002000 
001000 
000400 
000200 
000100 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000007 



100000 
040000 
020000 
010000 
004000 
002000 
000100 
000010 
000004 
000002 
000001 



000000 
000002 
000004 
000010 
000022 
000050 
000052 

1 76700 



SC 

TRE 

MCPE 

PSEL 

A17 

A16 

RDY 

IE 



4-APR-81 01 



biti 5 

BJT14 
BIT13 
BIT10 
BIT09 
BJT08 
BIT07 
BIT06 
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SPECIAL CONDITION-READ ONLY 
TRANSFER ERROR 

MASS8US CONTROL BUS PARITY ERROR-READ ONLY 

PORT B SELECT 

ADDRESS EXTENSION 

ADDRESS EXTENSION 

READY-READ ONLY 

INTERRUPT ENABLE 



;*RMCS2 RH CONTROL STATUS REGISTER #2 



DLT 

WCE 

UPE 

NED 

NEM 

PGE 

MXF 

MDPE 

OR 

IR 

CLR 

PAT 

BAI 

U2 

U1 

UO 



BIT15 
BIT14 
BIT13 
BIT12 
BIT11 
BIT10 
BIT09 
BIT08 
BIT07 
BIT06 
BIT05 
BIT04 
BIT03 
BIT02 
BIT01 
BITOO 



DATA LATE-READ ONLY 
WRITE CHECK ERROR-READ ONLY 
UN I BUS PARITY ERROR 
NONEXISTANT DRIVE-READ ONLY 
NONEXISTANT MEMORY-READ ONLY 
PROGRAM ERROR-READ ONLY 
MISSED TRANSFER 

MASS8US DATA BUS PARITY ERROR-READ ONLY 
OUTPUT READY-READ ONLY 
INPUT READY-READ ONLY 
CONTROLLER CLEAR 
PARITY TEST 

UNJBUS ADDRESS INCREMENT INHIBIT 
UNIT SELECT 
UNIT SELECT 
UNIT SELECT 



;UNIT SELECT MASK 



UNTMSK = 7 .-UNIT SELECT MASK 

;*RMCS3 RH70 CONTROL STATUS REGISTER *l 



APE 




BIT15 


: ADDRESS PARITY ERROR 


DPEHI 




BIT14 


•DATA PARITY ERROR HIGH WORD 


DPELO 




BIT13 


DATA PARITY ERROR LOW WORD 


WCEHI 




BIT12 


•WRITE CHECK ERROR HIGH WORD 


WCELO 




BIT11 


■WRITE CHECK ERROR LOW WORD 


DBL 




BIT10 


•DOUBLE WORD TRANSFER 


IE 




BIT06 


• INTERRUPT ENABLE 


IPCK3 




BIT03 


•INVERT PARITY CHECK 


IPCK2 




BIT02 


•INVERT PARITY CHECK 


IPCK1 




BIT01 


•INVERT PARITY CHECK 


IPCKO 




BITOO 


; INVERT PARITY CHECK 


.S8TTL 


RH CONTROLLER REGISTER INDEX VALUES 


RMCS1 




00 


•CONTROL. STATUS REGISTER *1 


RMWC 




02 


WORD COUNT REGISTER 


RMBA 




04 


•BUS ADDRESS REGISTER 


RMCS2 




10 


•CONTROL. STATUS REGISTER *2 


RMDB 




22 


•DATA BUFFER 


RMBAE 




50 


•BUS ADDRESS EXTENSION 


RMCS3 




52 


•CONTROL. STATUS REGISTER #3 


ABASE: 




176700 ,-UNIBUS ADDRESS 



fZRMQBO RM05/V2 DSKLb TST 2 
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000000 
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0001 74 
0001 76 



000200 

2 

3 000204 
4 

5 



0001 74 
000000 
000000 



0001 37 
000137 



002732 
002722 



SEO 0026 



. sbttl trap catcher 



•ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A ".♦?,MALT" 
•SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
•LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.=174 



DISPREG: 
SWRFG: 



.WORD 
.WORD 



C 
0 



.S8TTL STARTING ADDRESS (ES) 
JMP a#START 
J MP 8JSTART1 

.S8TTL ACT11 HOOKS 



; .-SOFTWARE DISPLAY REGISTER 
;; SOFTWARE SWITCH REGISTER 



;;JUMP TO STARTING ADDRESS OF PROGRAM 
; CHANGE RH/RM BUS ADDRESS 



000046 
000052 



6 
7 
8 



000210 
000046 
021530 
000052 
000000 
000210 

0011 00 



;HO0KS REQUIRED BY AC T 1 1 
$SVPC=. 
.=46 
SEND AD 

.=52 

.WORD 0 
.=$SVPC 



.=1100 
•SBTTL 



;SAVE PC 

;;1)SET L0C.46 TO ADDRESS OF SENDAD IN .SEOP 

;;2>SET LOC.52 TO ZERO 
;; RESTORE PC 



APT PARAMETER BLOCK 



;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



000024 
000044 



001100 
001100 
001102 
001104 
001106 
001110 
001112 



001100 
000024 
000200 
000044 
001100 
0011 00 



000000 
001222 
000002 
000002 
000002 
000042 
001114 



.$X=. 

.=24 

200 

.=44 

1APTHDR 

. = .SX 



SAVE CURRENT LOCATION 

SET POWER FAIL TO POINT TO START OF PROGRAM 
f OR APT START UP 

POINT TO APT INDIRECT ADDRESS PNTR. 
POINT TO APT HEADER BLOCK 
RESET LOCATION COUNTER 



SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP1 1 DIAGNOS T IC 
INTERFACE SPEC. 



SAPTHD 
SHI8TS 
SMBADR 
STSTM: 
SPASTM 
SUNITM 



T AGADR= . 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



0 

SMAR 

2 
2 
2 



TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
ADDRESS OF APT MAILBOX (BITS 0-15) 
RUN TIM OF LONCEST TEST 

RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDED UNIT 



SETEND-SMAIL/2 ; .'LENGTH MAI L80X-E TABLE (WORDS) 
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001114 
001114 
001116 
001117 
00H20 
001122 
0011 24 
001126 
001 1 30 
001131 
001132 
001134 
C01136 
001 KO 
001K2 
001 144 
001 H6 
001150 
001151 
001152 
001154 
001156 
001160 
001162 
001164 
001166 
001170 
001171 
001172 
00H73 
001174 
001176 
001200 
001202 
C01204 
001206 
001210 
001212 
001216 
001217 
001220 



001114 

000000 
000 
000 
000000 
000000 
000000 
000000 
000 
001 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000 
000 
000000 
177570 
177570 
177560 
1 77562 
177564 
177566 
000 
002 
012 
000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
207 
077 
015 
012 



377 
000 



177 



.S8TTL COMMON TAGS 



.-•THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
.-•USED IN THE PROGRAM. 



SCMTAG: 

STSTNM: 

SERFLG: 

IICNT: 

SLPADR 

SLPERR 

SERTTL 

1ITEMB 

SERMAX 

SERRPC 

SGDADR 

S6DADR 

SGDDAT 

SBDDAT 



SAUT08: 
SINTAG: 

SWR: 
DISPLAY 
$TKS: 
STK8: 
$TPS: 
$TPB: 
(NULL 
SFILLS 
SFILLC 
5TPFLG 
$TMPO 
STMP1 
STMP2 
STMP3 
STMP4 
STIMES: 
$E SCAPE 
SBELL 
$OUES 
SCRLF 
$LF: 



.=TAGADR 

.WORD 0 

.BYTE 0 

.BYTE 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

•BYTE 0 

.BYTE 1 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.BYTE 0 

•BYTE 0 

.WORD 0 

.WORD DSWR 

: .WORD DDISP 

177560 

177562 

177564 

177566 

.BYTE 0 

.BYTE 2 

.BYTE 12 

.BYTE 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

0 
:0 

.ASCIZ <207><177xZ77> 

.ASCII /?/ 

.ASCII <15> 

.ASCIZ <12> 



;; START OF COMMON TAGS 



CONTAINS THE TEST NUMBER 
CONTAINS ERROR FLAG 
CONTAINS SUBTEST ITERATION COUN T 
CONTAINS SCOPE LOOP ADDRESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERRORS DETECTED 
CONTAINS ITEM CONTROL BYTE 
CONTAINS MAX. ERRORS f»ER TEST 
CONTAINS PC OF LAST ERROR INSTRUCTION 
CONTAINS ADDRESS OF 'GOOD' DATA 
CONTAINS ADDRESS OF 'BAD' DATA 
CONTAINS •GOOD* DATA 
CONTAINS 'BAD' DATA 
RESERVED—NOT TO BE USED 



.-.AUTOMATIC MODE INDICATOR 
;; INTERRUPT MODE INDICATOR 



ADDRESS Of SWITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUFFER REG. ADDRESS 
CONTAINS NULL CHARACTER FOR F ILLS 
CONTAINS # OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A 'LINE FEED" 
'TERMINAL AVAILABLE" FLAG (BI T<07>~0=YES) 
USER DEFINED 
USER DEFINED 
USER DEFINED 
USER DEFINED 
USER DEFINED 

MAX. NUMBER OF ITERATIONS 
ESCAPE ON ERROR ADDRESS 
CODE FOR BELL 
QUESTION MARK 
CARRIAGE RETURN 
LINE FEED 



.S8TTL APT MAIL80X-E TABLE 



001222 

001222 000000 

001224 000X0 

001226 000000 



.EVEN 
$MAIL : 
SMSGTY 
S^AIAL 
STESTN 



;;APT MAILBOX 
.WORD AMSGTY ;; MESSAGE TYPE CODE 
.WORD AFATAL ; .-FATAL ERROR NUMBER 
.WORD ATESTN ; ; TEST NUMBER 



ZRMQBO RM05/W DSKLS TST 2 
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001230 


000000 


SPASS 




.WORD 


APASS 


;PASS COUNT 


OCH232 


000000 


SDEVCT 


.WORD 


ADEVCT ; 


; DEVICE COUNT 


001 234 


000000 


$UNIT 




.WORD 


AUNI T 


;I/0 UNIT NUMBER 


001236 


000000 


SMSGAD 


.WORD 


AMSGAD ; 


.-MESSAGE ADDRESS 


001240 


000000 


SMSGLG 


.WORD 


AMSGLG ; 


.•MESSAGE LENGTH 


001242 




SE TABLE : 




;APT ENVIRONMENT TABLE 


00^2^.2 


000 


$ENV: 




.BYTE 


AENV ; 


.'ENVIRONMENT BYTE 


001243 


000 


SENVM: 


.BYTE 


AENVM ; 


.•ENVIRONMENT MODE BITS 


001244 


000000 


SSWREG 


. WORD 


ASWREG ; 


;APT SWITCH REGISTER 


001246 


000000 


SUSWR 




.WORD 


AJ3WR 


.-USER SWITCHES 


001250 


000000 


SCPUOP 


.WORD 


ACPUOP ; 


;CPU TYPE .OPTIONS 






• 






BITS 15-11=CPU TYPE 






• * 
• 








1 1 /04=01 ,11/05=02.11 /20=Q3, 1 1 /40=04 , 1 1 /4S=05 






• 








1 1/70=06, PDQ=07. 0=10 






• • 

* 






BIT 10=REAL TIME CLOCK 






• 






BIT 9=FL0ATJNG POINT PROCESSOR 






• * 
m 






BIT 8=MEM0RY MANAGEMENT 


001252 


000 


JMAMS1 


.BYTE 


AMAMS1 ; 


.-HIGH ADDRESS, M.S. BYTE 


001253 


001 


SMTYP1 


.BYTE 


AMTYP1 ; 


;MEM. TYPE ,BLK#1 






* » 






MEM. TYPE BYTE — (HIGH BYTE) 






• * 
• 








900 NSEC CORE =001 






- » 
• 








300 NSEC BIPOLAR=002 






* » 

0 








500 NSEC MOS=003 


00 1 254 


000000 


SMADR1 


.WORD 


AMADR1 ; 


.HIGH ADDRESS, BLK#1 






■ * 

0 








MEM. LAST AD DR. =3 BYTES, THIS WORD AND LOW OF TYPE 


001256 


000 


SMAMS2 


.BYTE 


AMAMS2 ; 


.-HIGH ADDRESS, M.S. BYTE 


001257 


000 


SMTYP2 


.BYTE 


AMTYP2 ; 


; MEM. TYPE. BUC#2 


001260 


000000 


SMADR2 


.WQM> 


AMADR2 ; 


; MEM. LAST ADDRESS, 8LK#2 


001262 


ooc 


SMAMS3 


-BYTE 


AMAMS3 ; 


.HIGH ADDRESS. M.S. BYTE 


001263 


000 


SMTYP3 


.BYTE 


AMTYP3 ; 


; MEM. TYPE .BLKMl 


001264 


000000 


SMADR3 


.WORD 


AMADR3 ; 


; MEM. LAST ADDRESS. 6LK#3 


001266 


000 


SMAMS4 


.BYTE 


AMAMS4 ; 


.HIGH ADDRESS. M.S. BYTE 


001267 


000 


SMTYP4 


.BYTE 


AMTVP4 ; 


;MEM.rYPE,8Llor4 


001270 


000000 


SMADR4 


.WORD 


AMADR4 ; 


; MEM. LAST ADDRESS, BLK14 


001272 


120254 


ivEcn 


.WORD 


AVECT1 ; 


; INTERRUPT VECTORS .BUS PRIORI TY#1 


001274 


000000 


SVECT2 


.WORD 


AVECT2 ; 


.INTERRUPT VECT0R#2BUS PRIORI TY#2 


00^276 


1 76700 


S8ASE 




.WORD 


ABASE ; 


.BASE ADDRESS Of EQUIPMENT UNDER TEST 


001300 


000000 


SDEVM 




.WORD 


ADEVM ; 


.DEVICE MAP 


001302 


000000 


SCDW1 




.WORD 


ACDW1 


; CONTROLLER DESCRIPTION W0RD#1 


001304 


000000 


$CDW2 




.WORD 


ACDW2 ; 


.'CONTROLLER DESCRIPTION W0RD#2 


001306 


000000 


SDDWO 




.WORD 


ADDWO ; 


.•DEVICE DESCRIPTOR WORD#0 


C01310 


000000 


SDDW1 




.WORD 


ADDW1 ; 


;DEVICE DESCRIPTOR W0RD#1 


001312 


000000 


SDDU2 




.WORD 


ADDW2 


.'DEVICE DESCRIPTOR U0RD#2 


001314 


000000 


SDDW3 




.WORD 


ADDW3 


.'DEVICE DESCRIPTOR U0RD#3 


001316 


000000 


SDDW4 




.WORD 


ADDW4 


.'DEVICE DESCRIPTOR U0RD#4 


001320 


000000 


S0DU5 




.WORD 


ADDW5 


;DEVICE DESCRIPTOR W0RD#5 


001322 


000000 


SD0W6 




.WORD 


ADDW6 ; 


.•DEVICE DESCRIPTOR W0RD#6 


001324 


000000 


5DDW7 




.WORD 


ADDW7 


;DEVICE DESCRIPTOR W0RD#7 


001326 




$E TEND 
.MEXIT 









CZRMQBO RM05/3/2 DSKLS 
JSER DEFINED TAGS 



001 326 000000 
001 330 000000 
001 332 000000 



001 334 
001335 



001336 



000 
000 
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SEO 0031 



. SBTTL USER DEFINED TAGS 



AUTSJZ: .WORD 
CHGADR: .WORD 
XXDP: .WORD 



LSTRK : 



.8YTE 
.8YTE 



0 
0 

0 



c 

0 



ALLOW AUTO DRIVE SIZING = 0, USE MANUALLY INPUT DRIVES 

CHANGE HH/RM BUS ADDRESS - -1 , NO CHANGE = 0 

THE LOW BYTE CONTAINS THE DRIVE NUMBER FROM WHICH 

THE PROGRAM WAS LOADED. THE HIGH BYTE CONTAINS THE 

•XXDP* DEVICE CODE FOR THE RM05/3/2. 

LO BYTE = 0 

HI BYTE, CONTAINS LAST TRACK ADDRESS OF UNIT 
UNDER TEST. RM02/3 = 4. , RM05 = 18. 



= 1 



; THE REGISTER INPUT BUFFER IS USED FOR 
.•STORING DRWE STATUS 

GE T8UF : 



00K12 



00*412 
001414 
001416 
001420 
001422 
001424 
001426 
001430 
001432 
001434 
00H36 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 







.•REGISTER INPUT 


Bl 


00 I 336 


000000 


RMCS1I: .WORD 


0 


001340 


000000 


RMWCI 


.WORD 


0 


C01342 


000000 


RMBAI 


.WORD 


0 


001344 


000000 


RMDAI 


.WORD 


0 


001 346 


000000 


RMCS2I: .WORD 


0 


001350 


000000 


RMDSI 


.WORD 


0 


001352 


000000 


RMER1I: .WORD 


0 


001354 


000000 


RMASI 


.WORD 


0 


001356 


000000 


RMLAI 


• WORD 


0 


001360 


000000 


RMDBI 


.WORD 


0 


001362 


000000 


RMMR1I: .WORD 


0 


001364 


000000 


RMDTI 


.WORD 


0 


001366 


000000 


RMSNI 


.WORD 


0 


001370 


000000 


RMOFI 


.WORD 


0 


001372 


000000 


RMDCI 


.WORD 


0 


001374 


000000 


RMHRI 


.WORD 


0 


001376 


000000 


RMMR2I: .WORD 


0 


OOKOO 


000000 


RMER2I: .WORD 


0 


001402 


000000 


RMEC1I: .WORD 


0 


00H04 


000000 


RMEC2I: .WORD 


0 


001406 


000000 


RMBAEI: .WORD 


0 


001410 


000000 


RMCS3I : .WORD 


0 



CONTROL, STATUS REGISTER #1 
WORD COUNT REGISTER 
BUS ADDRESS REGISTER 
DISK ADDRESS REGISTER 
CONTROL, STATUS REGISTER #2 
DRIVE STATUS REGISTER 
ERROR REGISTER #1 
ATTENTION SUMMARY REGISTER 
LOOK AHEAD REGISTER 
DATA BUFFER 

MAINTENANCE REGISTER #1 

DRIVE TYPE REGISTER 

SERIAL NUMBER REGISTER 

OFFSET REGISTER 

DESIRED CYLINDER REGISTER 

HOLDING REGISTER 

MAINTENANCE REGISTER »2 

ERROR REGISTER #2 

ECC POSITION REGISTER 

ECC PATTERN REGISTER 

BUS ADDRESS EXTENSION REGISTER 

CONTROL. STATUS REGISTER #3 



; THE REGISTER OUTPUT BUFFER IS USED FOR 
.ASSEMBLING DATA GOING TO REGISTER 



PUT8UF : 

.•REGISTER OUTPUT BUFFER 



RMCS10: 


.WORD 


0 


RMWCO: 


.WORD 


0 


RMBAO: 


.WORD 


0 


RMDAO: 


.WORD 


0 


RMCS20: 


.WORD 


0 


RMDSO: 


.WORD 


0 


RMER10: 


.WORD 


0 


RMASO: 


.WORD 


0 


RMLAO: 


.WORD 


0 


PMD80: 


.WORD 


0 


RMMR10: 


.WORD 


0 



CONTROL. STATUS REGISTER #1 
WORD COUNT REGISTER 
BUS ADDRESS REGISTER 
DISK ADDRESS REGISTER 
CONTROL. STATUS REGISTFR #2 
DRIVE STATUS REGISTER 
ERROR REGISTER #1 
ATTENTION SUMMARY REGISTER 
LOOK AHEAD REGISTER 
DATA BUFFER 

MAINTENANCE REGISTER »1 



CZRHQBO RWOS/3/2 DSKLS T5T 
USE 1 * DEFINED TAGS 



MA».RO V04.00 



G 3 
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SEO 00 V 



001440 


000000 


RMDTO: 


.WORD 


0 


DRIVE TYPE REGISTER 


00H42 


000000 


RMSNO: 


.WORD 


0 


SERIAL NUMBER REGISTER 


001444 


000000 


RMOFO: 


.WORD 


0 


OFFSET REGISTER 


001446 


000000 


RMDCO: 


.WORD 


0 


DESIRED CYLINDER REGISTER 


001450 


000000 


RMHRO: 


.WORD 


0 


HOLDING REGISTER 


a a i / n 

001452 


AAAAAA 

000000 


nuuft On 

WTIRtrO 


. WURD 


A 

V 1 


MA IIUTCfcJAfurC DCriCTCD M~) 
HA JIM 1 CrvvMlC KtuJoltK mc 


001454 


000000 


RMER20 


.WORD 


0 


ERROR REGISTER 02 


001456 


000000 


RMEC10 


.WORD 


c 


ECC POSITION REGISTER 


00K60 


000000 


RMEC20 


.WORD 


0 


•ECC PATTERN REGISTER 


001462 


000000 


RMBAEO 


.WORD 


0 


•BUS ADDRESS EXTENSION REGISTER 


00 1 464 


000000 


RMCS30 


.WORD 


0 


CONTROL. STATUS REGISTER #3 






.-EACH WORD OF 


THE TEST QUE CONTAINS THE DEVICE NUMBER IN 






; THE LOW BYTE 


AND THE ATTENTION BIT IN THE HIGH BYTE. THE 






.-FIRST 


WORD CONTAINS THE 


ADDRESS OF THE DEVICE UNDER TEST 






;IN THE TABLE . 


A ZERO WORD IS A BLANK AND REPRESENTS THE 






;END OF THE QUE. 




001466 


000000 


TSTQ'JE 


.WORD 


0 


; CONTAINS DEVICE POINTER 


C01470 






.8LKW 


8. 


.-TEST QUE FOR DEVICES UNDER TEST 


001510 


000000 




.WORD 


0 


; TABLE TERMINATOR GOES HERE WHEN 












;ALL 8. DEVICES ARE UNDER TEST. 


001512 


172540 


SLPCSR 


• .WORD 


172540 


.-KW11-P CONTROL ♦ STATUS REGISTER 


001 5H 


172542 


SLPCSB 


: .WORD 


172542 


;KW11-P COUNT SET BUFFER 


001516 


000104 


SLPVEC 


: .WORD 


104 


;KW11-P INTERRUPT VECTOR 


001520 


000106 




.WORD 


106 




001 522 


177546 


SLLCSR 


• .WORD 


177546 


;KW11-I CONTROL ♦ STATUS REGISTER 


001524 


000100 


SLLVEC 


: .WORD 


100 


;KW11-L INTERRUPT VECTOR 


001526 


000102 




.WORD 


102 




001530 


000000 


$PSW: 


.WORD 




.STORAGE FOR PRIORITY 


001532 


000000 


TIME: 


.WORD 




.STORAGE FOR ELAPSED TIME 


001 5 34 


000000 


WATCH: 


.WORD 




.STORAGE FOR REMAINING TIME 


001536 


000000 


CLOCK: 


.WORD 




.-ADDRESS OF START CLOCK SUB 


001540 


ooooco 


STOPCL 


: .WORD 




.ADDRESS OF STOP CLOCK SUB 



;PUT TAGS HERE 



CZRMQBO RM05/3/2 DSKLS TST 
ERROR POINTER TABLE 



H 3 

MACRO V04.00 4-APR-81 01:29:56 PAGE 8 



,S8TTL ERROR POINTER TABLE 

•THIS TABLE CONTAINS THE INFORMATION f OR EACH ERROR THAT CAN OCCUR. 

•THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

•LOCATION SJTEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PF R T I NE N T . 

•NOTE1: IF $1 TEMB IS 0 THE ONLV PERTINENT DATA IS (SERRPO. 

•NOTE?: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS 

• EM ; .-POINTS TO THE ERROR MESSAGE 
DH ;. -POINTS TO THE DATA HEADER 

• DT ;; POINTS TO THE DATA 

• DF ;;POJNTS TO THE DATA FORMAT 



SEO 0033 



1 

2 
3 



001542 



001542 
C01544 
001546 
001550 



032460 
040364 
040500 
040534 



SERRTB: 
; ERROR 1 



EMT1 
FHT1 
EDT1 
EFT1 



CANNOT CLEAR NED STATUS 



4 

5 
6 



001552 
001 554 
001556 
001560 



032466 
040370 
040502 
040536 



.•ERROR 2 



EMT2 
EHT2 
EDT2 
EFT2 



CANNOT READ OR WRITE ANY DEVICE REG WITHOUT NED 



/ 
8 
9 



001562 
001564 
001 566 
001570 



032514 
000000 
000000 
000000 



; ERROR 3 



EMT3 

0 
0 
0 



CANNOT WRITE/READ ONES TO ANY DEVICE REGISTER 



10 
11 
12 



001572 
001574 
001576 
001600 



032534 
000000 
000000 
000000 



; ERROR 4 



EMU 

0 
0 
0 



CANNOT CLEAR ANY DEVICE REGISTER BITS W/HASS8US INI T 



T3 
?4 
T5 



001602 
001604 
001606 
001610 



032556 
040374 
040504 
040540 



.-ERROR 5 



EMT5 
EHT5 
EDT5 
EFT5 



CANNOT WRITE/READ ZEROS TO ALL BIT POSITIONS 



16 
17 



.-ERROR 6 



CANNOT WRITE/READ ONES TO ALL BIT POSITIONS 



L 



'ZHMQBO RM05/3/2 DSM.S 1ST 2 
FRROR POINTER TABLE 



18 



001612 
001614 
001616 
001620 



19 

20 
21 
22 



001622 
001624 
001626 
001630 



032602 
040374 
040504 
040540 



032624 
040400 
040504 
040540 



23 
24 
25 



001632 032646 

C01634 000000 

001636 000000 

001640 000000 



26 
27 
28 



001642 032664 

001644 OOCOOO 

001646 000000 

001650 000000 



29 
30 
31 



C01652 
001654 
001656 
001660 



32 
*3 
34 



001662 
001664 
001666 
001670 



35 
36 
37 



001672 
001674 
001676 
001700 



032702 
000000 
000000 
000000 



032720 
000000 
000000 
000000 



032736 
000000 
000000 
000000 
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EMT6 
EHT5 
EDT5 
EFT5 



SEO 0034 



; ERROR 7 



CANNOT WRITE/READ SHIFTING ONE 8JT TO Ail 81 r POSITIONS 
OF DEVICE REGISTERS 



EMT7 
EHT7 
EDT5 
EFT5 



.•ERROR 10 



REGISTER SELECT 1 APPEARS S-A-0 



EMTIO 
0 
0 
0 



; ERROR 11 



REGISTER SELECT 1 APPEARS S-A-1 



ENT11 
0 
0 
0 



; ERROR 12 REGISTER SELECT 2 APPEARS S-A-0 

EMT12 

0 
0 
0 



; ERROR 13 



REGISTER SELECT 2 APPEARS S-A-1 



EMT13 
0 
0 
0 



; ERROR 14 



REGISTER SELECT 4 APPEARS S-A-0 



EMT14 

0 
0 
0 



58 
39 



; ERROR 15 



REGISTER SELECT 4 APPEARS S-A-1 



CZR^QBO RMOW2 DSMS 1ST 2 
FRROR POINTER TABLF 



40 



001 702 032754 

001704 000000 

001 706 000000 

001710 000000 



41 
42 
43 



001712 032772 

0017K 000000 

001716 000000 

001 720 000000 



45 
46 



001722 033010 

001 724 000000 

C01726 000000 

001 730 000000 



47 
48 
A9 



001 732 033026 

001^34 040364 

001736 040500 

001740 040534 



50 
5i 
52 



001 742 033050 

001 744 040364 

001746 040500 

001 750 040534 



53 
54 
55 



001752 03307? 

001754 040364 

001 756 040500 

001760 040534 



56 
57 
58 



001762 033116 

001 764 040364 

001 766 040500 

001770 040534 



59 
60 

61 
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EMT15 
0 
0 
0 



SEQ 0035 



;tRR0R 16 



REGISTER SELECT 8 APPEARS S-A-0 



EMT16 

0 

0 

0 



.-ERROR 17 REGISTER SELECT 8 APPEARS S-A-1 

EMT17 

0 

0 

0 

.-ERROR 20 QPJ SET WITH SFACH TJMOUT DISABLED 

EMT20 
EHT1 
EDT1 
EFT1 



; ERROR 21 



OP I SET WITH SECTOR PULSE .SECTOR COMPARE WAS RESET 



ENT21 
EHT1 
EDT1 
EFT1 

; ERROR 22 DTE SET WITH INDEX PULSE. SEARCH WAS NOT ENABLED 

EMT 22 
EH71 
EDT1 
EFT1 

; ERROR 23 DTE SET WITH SFCTOR PULSE. SECTOR COMPARE WAS RESET 

EMT23 
EHT1 
EDT1 
EFT1 



.-ERROR 24 



DTE DID NOT SET Wl TH SECTOR PULSE. SECTOR COMPARE WAS SE T 



:Z«MQBO RMC5/3/2 DSKLS TST ? 
FRROR POINTER TABLE 

001772 033142 
001774 040364 
001776 040500 
002000 040534 

62 
63 
64 



002002 
002004 
002006 
002010 



65 
66 
67 



002012 
002014 
002016 
C02020 



053166 
040564 
040500 
040534 



033206 
000000 
000000 
OOOOOC 



68 
69 

70 



002022 033240 

002024 040364 

002026 040500 

002030 040534 



71 
72 
75 



002032 033260 

002034 040364 

002036 040500 

002040 040534 



74 
75 
76 



002042 033300 

002044 040364 

002046 040500 

002050 040534 



77 
78 
79 



002052 033314 

002054 040364 

002056 040500 

002060 040534 



K 3 
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EMT24 
EHT1 
EDT1 
EFT1 



SEO 0036 



80 
81 

82 



; ERROR 25 



DTE SET WITH SECTOR PULSE DURING FORMAT CHANGE 



EMT25 
EHT1 
EDT1 
EFT1 



; ERROR 26 MBA CLR L IS STUCK ACTJVE 

EMT26 
0 
0 
0 



; ERROR 27 



COULD NOT SET DTE AFTER FORMAT CHANGE 



EMT27 
EHT1 
EOT 1 
EFT! 



; ERROR 30 CANNOT SET PROM STROBE WITH BIT CLOCK 

EMT30 
EHT1 
EDT1 
EFT1 



; ERROR 31 



CANNOT CLEAR RMER1.DTE 



EMT31 
EHT1 
EOT 1 
EFT1 



; ERROR 32 



PROM STROBE RESET EARLY 



002062 033326 



EMT32 
EHT1 
EDT1 
EFT1 



.-ERROR 33 PROM STROBE SET EARL V 

EMT33 



CZRMQBO RM05/V2 DSKLS TST 2 
ERROR POINTER TABLE 

002064 040364 
002066 040500 
002070 040534 



L 3 
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EHT1 
EDT1 
EFT! 



S£0 0037 



83 
84 
85 



002072 033340 

002074 040364 

002076 040500 

002100 040534 



; ERROR 34 



EMT34 
EH T 1 
EDT1 
EFT1 



LOOKING FOR SVNC SET EARLY 



86 
87 
88 



002102 033352 

002104 040364 

002106 040500 

002110 040534 



;FRROR 35 



EMT35 
EHT1 
EDT1 
EFT1 



LOOKING FOR SYNC DID NOT SET 



89 
90 
91 



002112 
002114 
002116 
002120 



033364 
040364 
040500 
040534 



; ERROR 36 



EMT36 
EHT1 
EDT1 
EFT1 



PROM STROBE SET WHILE LOOKING FOR SVNC 



92 
93 
94 



002122 
002124 
002126 
002130 



033404 
040440 
040524 
040552 



.ERROR 37 



EMT37 
EHT115 
EDT115 
EFT115 



SVNC DETECTED WITH WRONG PATTERN 



95 
96 
97 



002132 
002134 
002136 
002140 



033434 
040364 
040500 
040534 



; ERROR 40 



EMT40 
EHT1 
EDT1 
EFT1 



SVNC NOT DETECTED 



98 
99 
100 



002142 
002144 
002146 
002150 



033456 
040364 
040500 
040534 



; ERROR 41 



EMT41 
EHT1 
EDT1 
EFT1 



DRIVE TIMING ERROR DID NOT CLEAR LOOKING FOR SYNC 



101 
102 
103 



002152 
002154 



033504 
040364 



; ERROR 42 



EMT42 
EHT1 



WRITE GATE DID NOT COME ON OR RESET EARLV 



CZRMQBO RM05/3/2 DSK.LS TST 2 
ERROR POINTER TABLE 



002156 040500 
002160 040534 



104 
105 
106 



002162 
0C2164 
002166 
002170 



107 
108 
109 



002172 
002174 
002176 
002200 



110 
111 
112 



002202 
002204 
002206 
002210 



113 
114 
115 



002212 
002214 
002216 
002220 



033522 
000000 
000000 
000000 



033522 
040400 
040504 
040540 



033554 
040364 
040500 
040534 



033570 
040364 
040500 
040534 
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EDT1 
EFT1 



SEO 0038 



: ERROR A? 



EMH3 
0 
0 
0 



; ERROR 44 



EMT43 
EHT7 
EDT5 
EFT5 



; ERROR 45 



EMU 5 
EHT1 
EDT1 
EFT1 



; ERROR 46 



EHT46 
EHT1 
EDT1 
EFT1 



INCORRECT SYNC PATTERN DURING HEADER 



INCORRECT SYNC PATTERN DURING HEADER 



HEADER AREA DID NOT COME ON OR RESET EARLY 



CRC ENABLE DID NOT SET 



116 
117 
118 



002222 
002224 
002226 
002230 



119 
120 
121 



002232 
002234 
002236 
002240 



122 
123 
124 



002242 
002244 
002246 



033604 
040404 
040506 
040534 



033622 
040364 
040500 
040534 



033640 
040364 
040500 



; ERROR 47 



INCORRECT HEADER GENERATED DURING WRITE 



EMT47 
EHT47 
EDT47 
EFT1 



; ERROR 50 READ GATE INCORRECT DURING HEADER AREA 

EMT50 
EHT1 
EDT1 
EFT1 



; ERROR 51 



UNEXPECTED HEADER ERROR DURING DIAGNOSTIC MODE 



EMT51 

EHT1 

EDT1 



CZRMQBO RM05/3/2 DSKLS TST 2 
ERROR POINTER TABLE 



002250 040534 



125 
126 
127 



002252 033654 

002254 040410 

002256 040510 

002260 040542 



128 
129 
130 



002262 
002264 
002266 
002270 



131 
132 
133 



002272 
002274 
002276 
002300 



134 
135 
136 



002302 
002304 
002306 
002310 



137 
138 
139 



002312 
002314 
002316 
002320 



140 
141 
142 



002322 
002324 
002326 
002330 



143 
144 
145 



002332 
002334 
002336 
002340 



040242 
040364 
040500 
040534 



033706 
040364 
040500 
040534 



033724 
040364 
040500 
040534 



033742 
040364 
040500 
040534 



033756 
040414 
040512 
040542 



033772 
040364 
040500 
040534 



N 3 
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SEO 0039 



EFT1 



.-ERROR 52 



EMT52 
EHT52 
EDT52 
EFT5? 



.-ERROR 53 



EMT276 
EHT1 
EDT1 
EFT1 



.ERROR 54 



EMT54 
EHT1 
EDT1 
EFT! 



; ERROR 55 



EMT55 
EHT1 
EDT1 
EFT1 



; ERROR 56 



EMT56 
EHT1 
EDT1 
EFT1 



; ERROR 57 



EMT57 
EHT57 
EDT57 
EFT57 



; ERROR 60 



EMT60 
EHT1 
EDT1 
EFT1 



INCORRECT HEADER READ IN DIAGNOSTIC MODE 



INCORRECT TAG BUS DURING DATA COMMAND 



DATA TIMING SEQUENCER CONTROLS INCORRECT DURING DATA COMMAND 



DATA AREA DID NOT COME ON OR RESET EARLY 



ECC ENABLE DID NOT SET 



DEVICE IS NOT AN RM05/3/2 



I/* VICE AVAILABLE IS NOT SET 



U8 



.-ERROR 61 



INCORRECT ECC PATTERN GENERATED DURING WRITE 



002 342 
002 344 
002346 
002350 



1 49 
150 
*31 



002352 
002354 
002356 
002360 



152 
153 
154 



002362 
002364 
002366 
002370 



T55 
156 
157 



002372 
002374 
002376 
002400 



158 
159 
160 



002402 
002404 
002406 
002410 



161 
162 
163 



002412 
002414 
002416 
002420 



164 
165 
166 



002422 
002424 
002426 
002430 



034006 
040420 
040514 
040542 



034024 
040364 
040500 
040534 



034042 
040364 
040500 
040534 



034054 
040364 
040500 
040534 



034070 
040364 
040500 
040534 



034102 
000000 
000000 
000000 



034116 
000000 
000000 
000000 



EMT61 
EHT61 
EDT61 
EFT57 



; ERROR 62 



EMT62 
EHT1 
EDT1 
EFT1 



; ERROR 63 



EMT63 
EHT1 
EDT1 
EFT1 



; ERROR 64 



EMT64 
EHT1 
EDT1 
EFT1 



; ERROR 65 



EWT65 
EHT1 

eon 

EFT1 



; ERROR 66 



EMT66 
0 

0 
0 



; ERROR 67 



EMT67 

0 
0 
0 



CANNOT CLEAR PROM STROBE WITH BIT CLOCK 



DATA AREA DID NOT RESET 



UNEXPECTED ECC ERROR IN DIAGNOSTIC MODE 



INCORRECT DATA TRANSFERRED TO HEWY 



CZRMQBO RM05/W DSKLS TST 2 
ERROR POINTER TABLE 



16 7 
'68 
169 



002432 
002454 
002436 
002440 



170 
172 



002442 
002444 
002446 
002450 



034134 
000000 
000000 
000000 



034154 
000000 
000000 
000000 



1ACR0 V04.00 4-APR-81 "1:2 



; ERROR 70 



F.MT70 
0 
0 
0 



.-ERROR 71 



EMT71 
0 
0 
0 



173 
175 



C02452 
002454 
002456 
002460 



034200 
000000 
000000 
000000 



; ERROR 72 



EMT72 
0 
0 
0 



176 
177 
178 



002462 
002464 
002466 
002470 



034224 
000000 
000000 
000000 



; ERROR 73 



EW73 

0 
0 
0 



179 
180 
181 



002472 
002474 
002476 
002500 



034244 
000000 
000000 
000000 



.ERROR 74 



EMT74 

0 
0 
0 



182 
183 
184 



002502 
002504 
002506 
002510 



185 
186 
187 



002512 
002514 
002516 
002520 



034254 
000000 
000000 
000000 



034266 
000000 
000000 
000000 



; E RROP 75 



E*T75 

0 
0 
0 



; ERROR 76 



E1T76 
0 
0 
0 



188 



C 4 
PAGE 8-8 



SEO 0041 



7RMQB0 RM05/W DSKlb T T 2 
FRROR POINTER TABLE 



189 

190 



0025?? 034302 

0025^4 000000 

002526 000000 

002530 000000 



191 
192 
1 93 



002532 
002534 
002536 
002540 



194 
195 
'96 



002542 
C02544 
002546 
002550 



197 
198 
199 



002552 
002554 
002556 
002560 



200 
201 
202 



002562 
002564 
002566 
002570 



203 
204 
205 



002572 
002574 
002576 
002600 



206 
207 
208 



002602 
002604 
002606 
002610 



036110 
040464 
040524 
040552 



040222 
040364 
040500 
040534 



034356 
040364 
040500 
040534 



036154 
040464 
040524 
040552 



036176 
000000 
000000 
000000 



036224 
040364 
040500 
040534 



D 4 

»WCR0 V04.00 4-APR-81 01; 29: 56 PAGE 8-9 



-EO 004 t -' 



; ERROR 77 



EMT77 

0 
0 

0 



.ERROR 100 



CANT SET VOLUME VALID 



E*T 170 
EHT150 
EDT115 
EFT115 



; ERROR 101 



RUN AND GO WONT SET 



EMT275 
EHT1 
EDT1 
EFT1 



.-ERROR 102 



SEARCH ENABLE WONT SET 



EMTIO? 
EHT1 
EDT1 
EFH 



; ERROR 103 



OCCUPIED IS INCORRECT FOR FUNCTION CODE 



EMT173 
EHT150 
EDT115 
EFT115 

; ERROR 104 READ IN PRESET DIDNT CLEAR RMDA. RMDC OR RMOF 

EMT174 

0 
0 
0 



.-ERROR 105 



READ IN PRESET DIDNT CLEAR RMOF 



EMT175 
EHT1 
EDT1 
EFT1 



209 
210 



: ERROR 106 



READ IN PRESET DIDNT CLEAR RMDA 



r7 RMQB0 RM05/V2 DSKlS T S T 2 
ERROR POINTER TABlE 



211 



002612 
002614 
002616 
002620 



212 
213 
2K 



002622 
00^624 
002626 
002630 



215 
216 

217 



036242 
040364 
040500 
0405 3<. 



040 546 
040364 
040500 
040534 



002632 036260 

002634 040364 

C02636 040500 

002640 040534 



E 4 
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EMT176 
EHT1 
EOT 1 
E'TI 

; E RROR 107 READ IN PRESET DIDNT CLEAR RMDC 

EMT302 
EMT1 
EDT1 
EFT1 



SEO 004 ^ 



; ERROR 110 



CANT SET OFFSET MODE BY OFFSET COMMAND 



EMT200 
EHT1 
EDT1 
EFT1 



218 
2!9 



;PUT ERROR TABLE HERE 



L. 



CZRMQBO RM05/3/2 DSKLS TST 2 
ERROR POINTER TABLE 



MACRO V'04.00 



F 4 

4-APR-81 01:29:56 PAGE 9 



SEO 0044 



1 
2 
3 
4 
5 
6 



7 
8 
9 
10 
11 
12 
13 
14 
15 
■•6 
17 
1 8 
19 
20 
21 
22 
23 



002642 
002644 
002646 
002650 
002654 

002714 
002714 
002716 
002720 



002722 
002730 

C02732 
002736 
002740 
002744 
002746 



002750 
002754 
002756 
002762 
002764 

002770 
002776 
003004 
003012 
003020 
003026 
003034 
003042 
003050 
003056 
003062 
003066 
003074 
003102 



011600 
005740 
022626 
104401 
000417 



010046 
104402 
000240 



012737 
000402 



012706 
005026 
022706 
001374 
012706 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
013737 
005037 
005037 
112737 
012737 
012737 



002656 



177777 001330 



005037 0C1330 
000240 

005227 000000 
001 375 
000005 



001114 

001154 

001100 

025222 
000340 
025752 
000340 
031006 
000340 
031114 
000340 
021366 
001206 
001210 
000001 
003074 
003102 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
021360 



001131 
001122 
001124 



; THIS routine HANDLES unexpected TIMEOUTS 



BADTMO: 


MOV 


(SP).RO 


;SAVE PC WHERE THE TIME OUT OCCURED 




TST 


-(RO) 


; ADJUST PC -2 




CMP 


(SP)*,(SP)* 


; RE STORE STACK POINTER 






.65$ 


;;TYPE ASCIZ STRING 




BR 


64$ 


;;GET OVER THE ASCIZ 






<CRLF>/UNEXPECTED BUS TIMEOUT, PC=/ 


64$: 










MOV 


RO.-(SP) 


.'SETUP FOR TYPING OUT PC 




T VPOf 






NOP 




;PUT 'HALT(O)' INSTRUCTION HERE If 








;T0 STOP ON UNEXPECTED TIMEOUT. 


.SBTTL 


START 


Of PROGRAM 




START 1 : 


MOV 


#-1 .CHGADR 


; CHANGE RH/RM BUS ADDRESS 




BR 


START2 




START: 


CLR 


CHGADR 


;N0 CHANGE IN ADDRESS 


START2: 


NOP 






INC 


#0 


,' TTY LOOP. WAIT FOR INCREMENT 




BNE 


.-4 


;0F WORD 




RESET 




.'RESET THE WORLD 



.S8TTL INP 
.; CLEAR THE 
MOV 
CLR 
CMP 
BNE 
MOV 
.'.INITIALIZE 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
MOVB 
MOV 
MOV 

;;SIZE FOR A 
TO A 



IALIZE THE COMMON TAGS 
COMMON TAGS ($CMTAG) AREA 

#$CMTAG.R6 

(R6)* 

#SWR.R6 

.-6 

#STACK.SP 
A FEW VECTORS 

#$SCOPE.*HOTVEC 
#340.*HOTVEC*2 
#$ERROR.a#£MTVEC 
#340.a#EMTV£C*2 
#$TRAP,*TTRAPVEC 



#340,a*TRAPVEC*2; LEVEL 7 



#$PWRDN.*TPWRVEC 
#340,a#PWRVEC*2 
$ENDCT.$£OPCT 
$T1M€S 
$E SCAPE 
#1 ,$ERMAX 
#..$LPADR 
#..$LPERR 



FIRST LOCATION TO BE CLEARED 
CLEAR MEMORY LOCATION 
DONE? 

LOOP BACK If NO 
SETUP THE STACK POINTER 

;IOT VECTOR FOR SCOPE ROUTINE 
LEVEL 7 

;EMT VECTOR FOR ERROR ROUTINE 
LEVEL 7 

;TRAP VECTOR FOR TRAP CALLS 



003110 


013746 


000004 




MOV 


003114 


012737 


003150 


000004 


MOV 


003122 


012737 


1 77570 


001154 


MOV 


003130 


012737 


177570 


001156 


MOV 


003136 


022777 


177777 


176010 


CMP 


003144 


001012 






BNE 


003146 


000403 






8R 



; POWER FAILURE VECTOR 
LEVEL 7 

SETUP END -OF -PROGRAM COUNTER 
INITIALIZE NUMBER OF ITERATIONS 
CLEAR THE ESCAPE ON ERROR ADDRESS 
;ALLOW ONE ERROR PER TEST 
INITIALIZE THE LOOP ADDRESS FOR SCOPE 
SETUP THE ERROR LOOP ADDRESS 
HARDWARE SWITCH REGISTER. If NOT FOUND OR IT IS 
-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 



a#ERRVEC.-<SP) 

#64$.a#ERRVEC 

'DSWR.SWR 

#DDISP. DISPLAY 

#-1,aSWR 

66$ 

65$ 



SAVE ERROR VECTOR 
SET UP ERROR VECTOR 
SETUP fOR A HARDWARE SWICH REGISTER 
AND A HARDWARE DlSPlAJr REGISTER 
TRY TO REfERENCE HARDWARE SwR 
BRANCH IF NO TIMEOUT TRAP OCCURRED 
AND THF HARDWARE SWR IS NOT 
BRANCH If NO TIMEOLT 



ZSMQBO RM05/3/2 DSKLS 1ST 
MMAlIZE THE COMMON UGS 



MACRO V04.00 



G 4 

4,-ap«-81 0 1 : ?9 : «>6 PAGE 9-1 



003150 
003154 
003156 
003164 
003172 

003176 
003202 
003210 
003212 
003220 

24 

25 003220 
<r6 003226 
27 
28 

003234 
003240 
G03242 
003250 
003252 
003256 

003332 

003332 
003336 
003340 
003346 
003350 
003356 
003360 
003362 
003364 
003372 

29 
30 
31 
32 

33 003372 

34 C03376 

35 003404 

36 003406 

37 003414 

38 003422 

39 003424 

40 003430 

41 003434 

42 003436 
003442 

003470 

43 003470 

44 003472 

45 003476 

46 003500 



0127'6 
000002 
012737 
012737 
012637 

005037 
132737 
001403 
012737 



012737 
012737 



005227 
00 1 034 
022737 
001430 
104401 
000425 



003156 

000176 
000174 
000004 

001230 
000200 

001244 



002642 
000300 



\77777 
021530 
003260 



005737 000042 
001012 

123727 001242 
001406 

023727 001154 
001005 
104407 
000403 

112737 000001 



SFQ 004 5 



001 1 54 
001156 



001243 
001154 



000004 
000006 



000042 



000001 
000176 

001 1 50 



005037 


001332 




122737 


000016 


000041 


001160 






013737 


000040 


001332 


122737 


000007 


001332 


103002 






105037 


001332 




005737 


000042 




001425 






104401 


003444 




000412 






005046 






113716 


001332 




104405 






001 







64$: 
65$: 
66$: 



67$: 
; SE TUP 



.S8TTL 
;;TYPE 



MOV 
RTJ 
MOV 
MOV 
MOV 

CLR 
BIT8 
BEO 
MOV 



#65$. (SP) 



; .SET UP FOR TRAP RETURN 
; .'POINT TO SOFTWARE SUIR 



'SUREG.SWR 
#D I SPREG. DISPLAY 
(SP)*.3#ERRVEC ; .-RESTORE ERROR VECTOR 



$PASS 

#APTSIZE.$ENVM 
67$ 

#$3WREG.SWR 



;; CLEAR PASS COUNT 
; ; TEST USER SIZE UNDER APT 
;; YES, USE NON-APT SWITCH 
;;NO.USE APT SWITCH REGISTER 



'TIMEOUT" TRAP VECTOR FOR UNEXPECTED BUS TIMEOUTS 

MOV #8ADTM0,ERRVEC ;SETUP FOR UNEXPECTED TIMEOUT 

MOV #PR6.ERRVEC*2 ; LEVEL 6 



TYPE PROGRAM NAME 
THE NAME OF THE PROGRAM 



IF FIRST PASS 



;;69$: 
68$: 
. S8TTL 



INC 


#-1 


..'FIRST TIME? 


BNE 


68$ 


; .-BRANCH IF NO 


CMP 


#$ENDAD,S#42 


;;ACT-11? 


BEO 


68$ 


; .-BRANCH IF YES 


TYPE 


.69$ 


;;TYPE ASCIZ STRING 


BR 


68$ 


; ; GE T OVER THE ASCIZ 



.ASCIZ <CRLF>aCZRMQ80 - RM05/3/2 DISKLESS TEST, PT 23<CRLF> 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



TST 


a*42 


; ;ARE WE RUNNING UNDER XXDP/ACT? 


BNE 


70$ 


; .'BRANCH IF YES 


CMPB 


$ENV.#1 


; ; ARE WE RUNNING UNDER APT? 


BEO 


70$ 


* 'BRANCH If YES 


CMP 


SWR,#SWR£G 


;; SOFTWARE SWITCH REG SELECTED? 


BNE 


71$ 


.-.'BRANCH IF NO 


GTSWR 




;;GET SOFT-SWR SETTINGS 


BR 


71$ 


Move 


»\ ,$AUT08 


;;SET AUTO-MODE INDICA10R 



70$: 
71$: 

;THE FOLLOWING FINDS OUT THE PROGRAM CONTROL MODE: 
.-PAPER TAPE (MANUAL). ACT 1 1 . XXDP CHAIN OR DUMP 

CLR XXDP .-CLEAR * XXDP * LOAD DEVICE STORAGE 

CMPB #16,8*41 .-LOADED FROM AN RM05/3/2 ? 

BNE 5$ ; BRANCH IF NOT 

MOV 8#40.XXDP ;GET DEVICE INDICATOR AND NUMBER 

CMPB #7,XXDP ;IS IT A VALID NUMBER ? 

SHIS 1$ ;YES 

CLRB XXDP ;N0. DEFAULT TO DRIVE 0 

TST S#42 ; CHAIN MODE OR AC T 1 1 AUTO ACCEPT ? 

BEO 3$ ;8R IF NEITHER 

TYPE .73$ ;;TYPE ASCIZ STRING 

BR 72$ ; ; GE T OVER THE ASCIZ 

.ASCIZ <CRlF>/NOT TESTING DRIVE / 

CLR -(SP) .-CLEAR WORD ON STACK 

M0V8 XXDP.(SP) ;GET DRIVE ADDRESS 

TYPOS ;iYPE THE ADDRESS 

.BYTE 1 .-ONLY 1 CHARACTER 



1$: 



• ' /3$: 



'ZRWQBO RM05/V? DSKLS 
>E T VALUE for software 



47 003501 

48 00350? 

49 003506 
50 

51 003510 

52 003514 

53 003516 
003522 

0035<.4 

54 003544 

55 003546 

56 003552 

57 003554 

58 003555 

59 003556 
003562 

003646 

60 C03646 
003652 

003746 

64 

65 003746 

66 003752 

67 003756 

68 003760 
69 

70 

71 003766 
7d 003766 
73 003774 
74 

75 003776 

76 004000 

77 004004 
78 

79 004010 

80 004016 

81 004020 

82 004024 
004026 
004030 
004031 

83 004032 
84 

85 004036 

86 004044 

87 004050 

88 004054 

89 004062 

90 004064 

91 004072 

92 004074 

93 004102 

94 004106 



000 
104401 
000517 

005227 
001114 
104401 
000410 



005046 
113716 
104403 
001 
000 
104401 
000431 



104401 
000435 



005037 
105737 
001561 
012737 



132737 
001146 

00500 1 
013700 
104401 

136137 
001531 
104401 
010146 
104403 
002 
000 
104401 

012760 
010160 
005760 
032760 
001051 
032760 
001450 
012737 
016002 
022702 



1ST 2 
SUI\H REGISTER 



001217 

-\77777 
0035?*. 



MACWO .'04.00 4-4PR-81 O 1 . -29:56 



H 

PAGE 



4 

9-2 



001332 



003564 



0C3654 



3$: 



5$: 



001300 If: 



001 326 
001150 

000377 001300 



000200 0012^3 



001276 
032166 

032450 

001217 

032342 

000040 
000010 
000012 
010000 

004000 

032204 
000026 
020025 



;;77$ : 
76$: 



;;78S: 

5S: 

; CHECK 



.8VTE 

T YPE 

BR 

INC 
BNE 
TYPE 
BR 

.ASCIZ 
CLR 

wove 

TYPOS 

.BYTE 

.BYTE 

TYPE 

BR 

.ASCIZ 

TYPE 
BR 

•ASCIZ 

FOR AUTO 
CLR 
TST8 
8EQ 
MOV 



0 

,$CRlF 

§s 
#-1 

5$ 

.75$ 
74$ 

<CRlF^/TO test drive / 



;SUPRESS LEADING ZEROS 
; CR-LF 

;GE T NUMBER OF DRIVES 

; FIRST TIME THRU HERE '. 
;N0 

;;TYPE ASCIZ STRING 
;;GET OVER THE ASCI 7 



-<SP) 
XXDP.(SP) 

1 
0 

.77$ 
76$ 



CLEAR WORD ON STACK 
GET DRIVE ADDRESS 
TYPE DRIVE ADDRESS 
ONLY 1 CHARACTER 
SUPRESS LEADING ZEROS 
.-TYPE ASCIZ STRING 
;GET OVER THE ASCIZ 



/. HALT PROGRAM, REMOVE RRDP PACK AND REPLACE JT/<CRLF^ 

.78$ ;;TYPE ASCIZ STRING 

5$ ; ; GE T OVER THE ASCIZ 

/WITH A WORK PACK. CLEAR LOCATION 40 AND RESTART PROGRAM. /'CRl r > 



MODE OR STANDALONE 



AUTSIZ 
$AUTOB 
STANDALONE 
#377.$D£VM 



LET AUTO DRIVE SIZING OCCUR 
RUNNING IN AUTO MODE ? 
BR IF NO 

SET DEVICE MAP FOR ALL DRIVES 



000010 

000010 
000000 
004300 



; PROGRAM IS RUNNING IN AUTO MODE - SEE IF SIZING IS ALLOWED 

XSIZ: 

.'SIZING ALLOWED ? 
;N0 

; START FROM DRIVE 0 
.LOAD THE BASE ADDRESS 
; TYPE 'UNIT STATUS:' 

;IS DEVICE PRESENT IN MAP ? 
BR IF NO 
CR-LF 

; SAVE R1 FOR TYPE OUT 
;G0 TYPE— OCTAL ASCII 
.-TYPE 2 DIGIT(S) 
.•SUPPRESS LEADING ZEROS 
TYPE 4 BLANKS 

CLEAR MASS BUS 
LOAD THE DRIVE ADDRESS 
ACCESS DRIVE REGISTER 
IS DRIVE PRESENT ? 
BR IF NO 

IS DRIVE AVAILABLE ? 
BR IF NO 

A5SUME RM02 DEVICF 
SAVE DRIVE TYPE REGISTER IN R2 
SINGLE PORT RMO? ? 



BITS 


#8IT7.$ENVM 


BNE 


12$ 


CLR 


R1 


MOV 


$8ASE.R0 


TYPE 


.SYSTAT 


B1TB 


ATNT8L(R1>.$DFVM 


be a 


11$ 


TYPE 


,$CRLF 


MOV 


R1.-(SP> 


TYPOS 




.BYTE 


2 


.BYTE 


0 


TYPE 


.BLNKS4 


MOV 


#CLR.RMCS2(R0) 


MOV 


&1,RMCS2(R0> 


TST 


RMDS(RO) 


BIT 


#NED,RMCS?(RO) 


3NE 


3$ 


BIT 


#DVA.RMCSKRO) 


BEO 


4$ 


MOV 


#$RM02.10$ 


MOV 


RMDT (R0> ,R2 


CMP 


#20025. R^ 



ZRMQBG RM05/3/2 DSKlS TST 2 MACRO V04.00 4-APR-8' 
;E T vAluE *0R SOFTWARE SWITCH REGISTER 



95 
% 
97 
98 
99 
00 
01 
02 
05 
OA 
05 
06 
07 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 

18 
19 

20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 



004112 
004114 
004120 
004122 
004130 
004134 
004136 
004142 
004144 
004152 
004156 
004160 
004164 
004166 
004172 
004174 
004202 
004204 

C04206 
004212 

004214 
004220 
004224 
004226 
004234 

004236 
004242 

004244 
004250 
004252 
004256 
004260 
004264 

004266 
004272 
004276 
004 300 

004302 
004304 
004310 

004312 
004316 



001430 
022702 
001425 
012737 
022702 
001417 
022702 
001414 
012737 
022702 
001406 
022702 
001403 
104401 
000443 
032760 
001415 
000417 

104401 
000402 

104401 
005737 
001026 
146137 
000422 

104401 
000413 

005737 
001406 
123701 
001360 
104401 
000755 

104401 
104401 
104401 
000000 

005201 
020127 
003637 

104401 
000137 



C24025 

032211 004300 
020024 

024024 

032216 004300 
020027 

024027 

032223 

010000 000012 



032261 



032276 
001326 

032450 001300 



032315 

001332 
001332 
032244 



032326 
032344 



000007 



001217 
005004 





BE 0 




CMP 




BEQ 




MOV 




CMP 




BEQ 




CMP 




BEQ 




MOV 




CMP 




BEQ 




CMP 




BEQ 




TYPE 




BR 


2S: 


BIT 




BEQ 




BR 


3$: 


TYPE 




BR 


4$: 


TYPE 


5$: 


TST 




BNE 




BICB 




BR 


6$: 


TYPE 




BR 


7$: 


TST 




BEQ 




CMPB 




BNE 




TYPE 




BR 


8S: 


TYPE 


9$: 


TYPE 




TYPE 


10$: 


.WORD 




INC 




CMP 




BLE 


12$: 


TYPE 




J MP 



01:29:56 PAGE 9-5 



c fQ 0047 



2$ 

#24025. R2 
2$ 

#$RM03,10$ 
#20024. R2 
?$ 

#24024. R2 
2$ 

#$RM05.10$ 

#20027. R2 
2$ 

#24027. R2 
2$ 

.NOTRM 
11$ 

#MOL,RMDS<R0) 

6$ 

7$ 



8R If YES 

DUAL PORT RM02 ? 

BR If YES 

ASSUME RM03 DEVICE 

SINGLE PORT RM05 ? 

BR IF YES 

DUAL PORT RM03 ? 

BR IF YES 

ASSUME RM05 DEVICE 

SINGLE PORT RM05 "* 

BR IF YES 

DUAL PORT RM05 ? 

BR IF YES 

DRIVE NOT AN RM05/3/2 
CHECK NEXT DRIVE 
IS MEDIUM ON LINE ? 
BR IF NO 



.NOTPRS 
5$ 



; DRIVE NOT PRESENT 
.•CHECK NEXT DRIVE 



.NOTAVL 
AUTSJZ 
11$ 

ATNTBL(R1).$DEVM 



; DRIVE NOT AVAILABLE 
.AUTO SIZING ON ? 
;8R If NO 



11$ 

.UNTOFF 
9$ 

XXDP 
8$ 

XXDP.R1 
5$ 

.LODEV 
5$ 



.-CLEAR DEVICE FROM BIT MAP 



; CHECK NEXT DRIVE 

; DRIVE OFFLINE 
.-PRINT DRIVE TYPE 



LOADED FROM RM80 ? 
NO 

IS THIS THE DRIVE ? 
BR IF NO 

DRIVE IS LOAD DEVICE 



.UNTON 
.8LNKS2 



R1 

R1.#7 
1$ 

.$CRLF 
CMNSTART 



.DRIVE ONLINE 
; T YPE 2 BLANKS 
.PRINT DRIVE TYPE 
.'MESSAGE ADDRESS HERE 

; INCREMENT THE DRIVE ADDRESS 
; ALL DRIVES ARE CHECKED ? 
; BRANCH IF NOT 

; CR-LF 

; JUMP TO COMMON START 



;r*iqbc rmos/V2 

V AND ALONE INPuT 



DSKLS TST 
ROUTINES 



3 
4 
5 
6 

7 
8 

9 

1 0 

12 
'5 
14 
15 
16 
1? 
'8 
■•9 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 

34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 



004322 
004322 

004326 
004332 



004334 
004340 
00434? 
004346 
004354 
004356 
004362 
004366 
004370 
C04374 
004400 



004402 
004402 
004406 
004410 
004414 



004420 
004420 
00*424 
004430 
004432 
004436 
004440 
004444 
004446 
004454 
004456 
C04462 
004464 

004472 
004476 
004500 
004504 
004506 
004512 
004514 
004520 
004522 
004530 
004532 
004536 
004540 



004737 

005227 
001023 



104401 
1044H 
012637 
123727 
001005 
104401 
104401 
000414 
104401 
104401 
000407 



005737 
001457 
005037 
104401 



104401 
013746 
104402 
104401 
104413 
012637 
001412 
022737 
101403 
104401 
000756 
013737 

104401 
005046 
113716 
104402 
104401 
104413 
012637 
001412 
022737 
101003 
104401 
000755 
113737 



027422 
W7777 

031556 

001 1 76 
001 1 76 

001 1 76 
054636 

032336 
0C1217 

001330 

001330 
001217 

031607 
001276 

032344 

001 1 76 

160000 

031617 

001176 

031661 

001272 

032344 

001 1 76 

001000 

031670 

001176 
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.S8TTL STANDALONE INPUT ROUTINES 



SEO 0048 



STANDALONE : 
JSR 

INC 
BNE 



PC.STKINT .-INITIALIZE CONSOLE 

#-1 .-FIRST TIME THRU HERE ? 

2$ ;8R IF NO 



; SEE IF OPERATOR WANTS HELP TEXT 
.MSHELP 



OOO 1 31 



1$: 



TYPE 
RDCHR 
MOV 
CMP8 
BNE 
TYPE 
TYPE 
BR 
TYPE 
TYPE 
BR 



<SP)*,$TMP1 
STMP1 ,#'Y 
1$ 

,$TMP1 
.HELP 
3$ 
.N 

.SCRLF 
3S 



WANT HELP ? 

GET RESPONSE 

SAVE AND ECHO RESPONSE 

WAS IT A YES RESPONSE ? 

NO 

TYPE 'V 

YES - TYPE HELP TEXT 

TYPE *N' 
CR-LF 



;SEE IF USER WANTS TO CHANGE UNI8US ADDRESS 
2S: 

TST CHGADR 
BEO 7% 
CLR CHGADR 
TYPE .SCRLF 



CHANGE RH/RM BUS ADDRESS ? 
BR IF NO 

NO CHANGE NEXT TIME 
CR-LF 



001176 



001276 



.•DIALOGUE TO CHANGE THE UNI8US ADDRESS. VECTOR ADDRESS AND INTERRUPT PRIORITY 
3$: 

TYPE CURRENT BUS ADDRESS 
; SAVE S8ASE FOR TYPE OUT 
;G0 TYPE— OCTAL ASCII (ALL DIGITS) 
TYPE 2 BLANKS 
GET NEW BUS ADDRESS 
CARRIAGE RETURN ? 
YES-SKIP TO NEXT ENTRY 
BASE ADDRESS IN I/O PAGE ? 
YES 

TYPE WARNING MESSAGE 
TRY AGAIN 

STORE NEW BUS ADDRESS 



4$ 
5$ 



001 1 76 



001272 6$: 



TYPE 


.CNSL01 


MOV 


$8ASE.-(SP) 


TYPOC 




TYPE 


.8LNKS2 


RDOCT 




MOV 


(SP)»,STMP1 


BEO 


51 


CMP 


#1 60000. STMP1 


BLOS 


4S 


TYPE 


,CNSL02 


BR 


3* 


MOV 


$TMP1.$8ASE 


TYPE 


.CNSL03 


CLR 


-(SP) 


M0V8 


$VECT1,(SP) 


TYPOC 




TYPE 


.BLNKS2 


RDOCT 




MOV 


(SPH.STMP1 


BEO 


7$ 


CMP 


#1000.STMP1 


BHI 


6$ 


TYPE 


.CNSL04 


BR 


5s 


M0V8 


STMP1.SVECT1 



GET CURRENT VECTOR ADDRESS 

TYPE 2 BLANKS 
GET NEW VECTOR ADDRESS 
CARRIAGE RETURN? 
YES-SKIP TO NEXT ENTRY 
VECTOR ADDRESS < 1000 ? 
YES! ! 

TYPE WARNING MESSAGE 
RETRY 

STORE NEW VECTOR ADDRESS 



'ZRMQBO RM05/3/2 DSKLS T ST 2 
STANDALONE INPUT ROUTINES 



57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
08 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
100 
101 
102 



004546 
004552 
004554 
004560 
004564 
004570 
004574 
004576 
004602 
004610 
004612 
004616 
004624 

004o30 
004636 
004640 
C04644 
004652 
004654 
004662 
004664 

004666 
004670 
004674 
004702 
004704 
004710 
004714 
004722 
004724 
004732 
004734 
004740 

004742 
004746 
004752 
004760 
004766 
004770 
004774 
005000 



005227 
00 1 002 
104401 
104401 
005037 
104401 
104411 
012637 
023727 
001007 
104401 
012737 
000137 

023727 
001436 
104401 
023727 
002430 
023727 
003427 
000423 

104411 
012637 
023727 
001432 
104401 
104401 
023727 
002404 
023727 
003403 
104401 
000711 

013701 
042701 
156137 
122737 
101337 
005237 
104401 
000137 



^77777 

031 72<. 
001217 
001 300 
032144 

001 1 76 
001 1 76 

031542 
000377 
003766 

001176 

001 1 76 
OCT 176 

001176 



001176 
001 1 76 

031553 
001 1 76 
001176 

001176 

032066 



001176 
177770 
032450 
000377 

001326 
001217 
003766 



MACRO V0A.00 4-APR-81 



DIALOGUE TO I 



8$- 

9$: 



000101 

001 300 

000015 

000060 
000067 

00001 5 

000060 
000067 



10$: 



11$: 



001300 
001 300 



12$: 
13$: 

H$: 



INC 
BNE 
TYPE 
TYPE 
CLP. 
TYPE 
RDCHR 
MOV 
CMP 
BNE 
TYPE 
MOV 
JMP 

CMP 

BEQ 

TYPE 

CMP 

BLT 

CMP 

BLE 

BR 

RDCHR 

MOV 

CMP 

BEQ 

TYPE 

TYPE 

CMP 

BLT 

CMP 

BLE 

TYPE 

BR 

MOV 

BIC 

BIS8 

CMP8 

BMI 

INC 

TYPE 

JMP 
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SEQ 0049 



'UT DEVICE NUMBERS 

*-1 .-FIRST TJME THRU ? 

8$ ;8R IF NO 

.CNSL07 .-TYPE INPUT INSTRUCTIONS 

,$CRLF ; CR-LF 

$DEVM .-CLEAR DEVICE MAP 

.MSDRVS .-TYPE 'DRIVE (S): ' 

(S: j )*.$TMP1 ;GET RESPONSE 

$TMP1 .*'A ;IS INPUT "A" ? 

10$ ;N0 

.ALL ;YES. TYPE "ALL" AND GO 

*377.$DEVM ;SET DEVJCE MAP FOR ALL DRIVES 

XSIZ ;AUTO SIZE. 

$TMP1.#CR .'CARRIAGE RETURN ? 

12$ ;YES 

? $TMP1 ;ECHO RESPONSE 

STMPl.fO ; NUMBER < 0 ? 

12$ ;YES 

$TMP1.#'7 .NUMBER > 7 ? 

13$ ;N0 

12$ .'ILLEGAL INPUT 



(SP>*.$TMP1 ;GET RESPONSE 

$TMP1.#CR .-CARRIAGE RETURN ? 

14$ ;YES 

, COMMA ;TYP£ \ • 

,$TMP1 ;ECHO RESPONSE 

$TMP1,#'0 ; NUMBER < 0 ? 

12$ ;YES 

$TMP1,#'7 ; NUMBER > 7 ? 

13$ ;N0 

.CNSL08 ; TYPE "? RLE GAL INPUT" 

9$ .RETRY 

$TMP1,R1 ;R1 = DRIVE NUMBER 
#*C7,R1 

ATNTBL (R1 ) ,$DEVM ;SET DEVICE IN MAP 

#377.«>EVM .'DONE ? 

11$ ;N0 

AUTSIZ .DO NOT AUTO SIZE WHEN TYPING DRIVE STATUS 

,$CRLF ; CR-LF 

XSIZ ;G0 SIZE DEVICES 



'ZRMQBO RM05/3/2 DSKLS TST 2 
STANDALONE INPUT ROUTINES 
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SEO 0050 



1 

2 


005004 






3 


005004 


104401 


032110 


4 


005010 


01 3700 


001300 


5 


005014 


001004 




6 


005016 


104401 


031553 


7 


005022 


104401 


032137 


8 


005026 


012701 


001470 


9 


005032 


010137 


001466 


10 


005036 


012702 


000001 


11 


005042 


005003 




12 


005044 


030200 




13 


005046 


001413 




14 


005050 


104401 


031553 


15 


005054 


010311 




16 


005056 
005060 
005062 
005063 


010346 
104403 
001 
000 




17 


C05064 


116361 


032450 


18 


005072 


062701 


000002 


19 


005076 


006302 




20 


005100 


105702 




21 


005102 


001402 




22 


005104 


005203 




23 


005106 


000756 




24 


005110 


005011 




25 


005112 


104401 


001217 


26 








27 








28 


005116 


004737 


021550 


29 


005122 


000425 




30 


005124 
005130 


104401 
000413 


005132 



31 



005160 
005160 

32 005164 

33 005166 

34 005172 

35 005176 
36 

37 005200 

38 005202 

39 005206 

40 005210 

41 005214 

42 005216 

43 005222 

44 005226 
45 

46 005226 

47 005232 

48 005236 

49 005242 
005246 
005252 



005737 
001002 
000137 
000137 
000413 

000240 
105737 
001007 
005737 
001002 
000137 
000137 



105037 
005037 
004737 
012746 
012746 
000002 



000042 

00273? 
021520 



001300 

000042 

002732 
021520 



001116 
001206 
027422 
000000 
005254 



.•ASSEMBLE TEST QUE FROM DEVICE MAP 
TMNSTART: 



1$: 



2$: 



000001 



3$. 



4$: 



TYPE 


.DRIVES 
1DEVM.R0 


TYPE 'DRJVE(S) TO BE TES T ED 


MOV 


RO = DEVICE MAP 


BNE 


1$ 


BR If DRIVES TO TEST 
TYPE ' 


TVPE 


, COMMA 


TYPE 


.NONE 


TYPE 'NONE ' 


MOV 


#TSTQUE*2.R1 


R1 = ADDRESS OF FIRST ENTRY 


MOV 


R1.TST0UE 
#1.R2 


INITIALIZE ENTRY POINTER 


MOV 


R2 = DEVICE POINTER 


CLR 


R3 


R3 = DEVICE NUMBER 


BIT 


R2.R0 


IS THIS DEVICE IN MAP ? 


BEO 


3$ : 


NO . ! 


TYPE 


.COMMA 


TYPE \ ' 

YES - ENTER DEVICE NUMBER I 


MOV 


R3.(RD 


MOV 


R3.-(SP) 


; SAVE R3 FOR TYPE OUT 


TYPOS 




;G0 TYPE— OCTAL ASCII 


• BYTE 


1 \ 


; TYPE 1 DIGIT(S) 


.BYTE 


0 


.SUPPRESS LEADING ZEROS 


M0V8 


ArNT8L(R3).1(R1). 


ENTER ATTENTION BIT IN QUE 


ADD 


*2,R1 


ADVANCE ENTRY POINTER 


ASL 


R2 


ADVANCE DEVICE POINTER 


TST8 


R2 


DOME ALL DEVICES ? 


BEO 


At 


YES 


INC 


R3 


ADVANCE DEVICE NUMBER 


BR 


2$ 


ENTER NEXT DEVICE 


CLR 


<R1) 


TERMINATE TEST QUE 


TYPE 


.SCRLF 


TYPE CR-LF 



.-SIZE 


FOR CLOCK 






JSR 


PC.SIZCLK 




BR 


61 




TYPE 


.65$ 




BR 


64$ 


;;65$: 


.ASCIZ 


<CRLF>/NO 'L' 


64$: 








TST 


3*42 




BNE 


5$ 




JMP 


START 


5$: 


JMP 


$GET42 


6$: 


BR 


READYl 


READY: 


NOP 






TST8 


$DEVM 




BNE 


2$ 




TST 


a»42 




BNE 


i$ 




JMP 


START 


1$: 


JMP 


$GET42 



2$: 
READY1 



CLR8 

CLR 

JSR 

MOV 

MOV 

RTI 



$TSTNM 
$TIMES 
PC,$TKINT 
#PRO.-(SP) 
#64$. -(SP) 



SEE IF CLOCK PRESENT 
YES - CLOCK IS PRESENT 
; TVPE ASCIZ STRING 
;GET OVER THE ASCIZ 



ANY MONITOR PRESENT ? 

BR IF YES 

JUMP TO START 

RETURN CONTROL TO MONITOR 



READY TO START TEST 
ANY DRIVES IN MAP ? 
BR IF YES 

ANY MONITOR PRESENT ? 

BR IF YES 

JUMP TO START 

RETURN CONTROL TO MONITOR 



RESET TEST NUMBER 

INITIALIZE NUMBER OF ITERATIONS 

INITIALIZE TTY 

;PUT NEW PS ON STACK 

;PUT NEW PC ON STACK 

;POP NEW PC AND PS 



CZRMQBO RM05/3/2 DSKLS TST 2 
STANDALONE INPUT ROUTINES 
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SEO 005* 



005254 
50 005254 
51 
52 
53 
54 

55 005262 

56 005270 

57 005274 

58 00530^ 

59 005310 
oO 005314 

61 005320 

62 005324 

63 005326 
64 

65 
66 

67 005334 

68 C05340 

69 005344 

005350 
005352 
005353 

70 005354 

71 005356 

72 005360 

73 005362 

74 005364 



117737 174206 001234 



012737 
013700 
012760 
117760 
016002 
042702 
022702 
001003 
012737 



104401 
104401 
013746 

104403 
002 
000 
005004 
005304 
001376 
005304 
001376 



64$: 



M0V8 



STSTQUE ,$UNI T ; L OAD DRIVE N'JMBER 



; CLEAR MASS8US CONTROLLER, SELECT DRJVE AND DETERMINE THE LAST TRACK 
;0F THE DIFFERENT DRIVE TYPES 



002000 001 334 
001276 

000040 000010 
174160 000010 
000026 
1 77770 
000007 

011000 001334 



001217 
032160 
001234 



MOV #TA4,LSTRK 

MOV S8ASE.R0 

MOV #CLR,RMCS2(R0> 

M0V8 aTSTQUE.RMCS2(R0) 

MOV RMDT(R0>,R2 

8IC AM77770.R2 

CMP #7.R2 

BNE 3$ 

MOV #TA16! TA2,LSTRK 



ASSUME LAST TRACK FOR RM02/3 = 4. 
RO = UNJ8US ADDRESS 
CLEAR MASS8US 

; SELECT DEVICE UNDER TEST 
GET RMDT AND 
SAVE DRIVE TYPE BITS 
IS IT AN RM05 ? 
NO, MUST BE AN RM02 OR RM03 
YES— SET LAST TRACK = 18. 



; T YPE DRIVE NUMBER TO BE TESTED($UNJT) 



3$: 



-YPE 
TYPE 
MOV 

TYPOS 

• BYTE 

.8YTE 

CLR 

DEC 

BNE 

DEC 

BNE 



.JCRLF 

.MSGDRV 

$UNJT,-(SP) 



2 

0 

R4 

R4 

.-2 

R4 

.-2 



CR-LF 

TYPE 'DRIVE ' 

; SAVE SUNIT FOR TYPE OUT 
TYPE DRIVE NUMBER 
GO TYPE— OCTAL ASCII 
TYPE 2 DIGiT(S) 

; SUPPRESS LEADING ZEROS 

THESE TWO LOOPS ARE ADDED 

WAIT FOR TTY 



TO 



CZRMQBO RM05/3/2 DSKLS T ST 2 
REGISTER AND STORAGE USAGE 

1 
2 
3 

5 

6 

7 

8 

9 
10 
11 
12 
13 
H 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
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SEQ 0052 



S8TTL REGISTER AND STORAGE USAGE 
REGISTER ASSIGNMENTS 



RO 
R1 

R2.R3 
R4.R5 

R6 

R7 



UNI8US ADDRESS OF RH CONTROLLER 
ADDRESS OF ENTRY IN TEST QUE CORRESPONDING TO THE 
UNIT UNDER TEST r 
WORKING REGISTERS FOR TEST IN PROGRESS, MUST BE 
SAVED BY SUBROUTINES 

GENERAL WORKING REGISTERS, ARE NOT SAVED BY 

SUBROUTINES 

STACK POINTER 

LINKAGE REGISTER TO SUBROUTINES 



STORAGE ASSIGNMENTS 

STMP0-STMP4 TEMPORARY STORAGE , NOT SAVED BY SUBROUTINES 
SGDDAT,$8DDAT EXPECTED AND RRECEIVED STATUS FOR ERROR TYPE OUT 
SGDADR S8DADR ADDRESS OF EXPECTED AND RECEIVED STATUS IF APPLICABLE , 
ALSO THE ADDRESS OF A REGISTER ERROR 



STSTN 
SUNIT 
RGIN8F 



RGOTBF = 



TEST NUMBER 

NUMBER Of DEVICE BEING TESTED 

THE REGISTER INPUT BUFFER HAS A STORAGE LOCATION FOR 
EACH REGISTER, AND IS USED WHEN READING STATUS AND 

THE ^REGISTER OUTPUT BUFFER HAS A STORAGE LOCATION FOR 
EACH REGISTER, AND IS USED FOR ASSEMBLING DATA TO Be 
WRITTEN IN REGISTERS 



; • • t i 



2 

3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
'6 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 



005366 
005366 
005370 
005372 
005376 
005402 
005406 

005414 



TST1 



005420 
005420 
005424 
005432 
C05440 
005442 
005446 
005454 
005462 
005466 
005474 
005476 



005500 
005500 
005502 
005504 
005506 
005514 

005516 
005522 
005530 
005536 
005540 
005544 
005552 
005560 
005564 
005572 
005574 



005576 
005576 
005602 
005610 



000004 




SCOPE 




; SCOPE 


r a i i 

CALL 


000240 




NOP 








012706 


001100 


MOV 


/TSTACK.SP 


;L0AD 


THE STACK POINTER 


013700 


001276 


MOV 


S8ASE.R0 


;R0 = 


UN I BUS ADDRESS 


U I jmJ l 


UU 1 nDD 


PTU V 


I j l UUC , n l 






012737 


000001 001226 


MOV 


»1.$TESTN 


; ; SE T 


TEST NUMBER IN APT MAIL BOX 


012702 


000000 


MOV 


»0.R2 


;R2 = 


REGISTER INDEX, 



004737 
016037 
032737 
001417 
111137 
042737 
052737 
010037 
062737 
104001 
000475 



012713 
032760 
001432 



022404 
000010 
010000 

001140 
1 77770 
000100 
001 1 36 
000010 



001142 
001142 



OOH40 
001140 

001136 



; CLEAR THE MASSBUS AND VERIF Y THAT NONEXISTANT DEVICE ERRO* IS RESE ' 
10$: 

JSR PC.CNTCLR ;G0 CLEAR CONTROLLER 

MOV RMCS2(R0),$BDDAT ; STORE RMCS2 AT $BDDAT 

BIT #NED,$BDDAT 

BE 0 20$ 

M0V8 <R1>.$GDDAT 

BIC #*CUNTMSK.$GDDAT 

BIS #IR.$GDDAT 

MOV R0.$8DADR 

ADD #RMCS2,$BDADR 

EMT 1 

BR 60$ 

;READ THE REGISTER WHOSE INDEX IS IN R2 AND EXIT TEST If THE READ 
.DOES NOT SET 'NED" ERROR 



010003 






MOV 


060203 






ADD 


011304 






MOV 


C32760 


010000 


C00010 


BIT 


001470 






BE 0 


004737 


022404 




JSR 


016037 


000010 


001142 


MOV 


032737 


010000 


001142 


BIT 


001417 






BEO 


111137 


001140 




MOVS 


042737 


177770 


001140 


BIC 


052737 


000100 


001140 


BIS 


010037 


001136 




MOV 


062737 


000010 


001136 


ADD 


104001 






EMT 


000436 






BR 



;R3 = REGISTER ADDRESS 

;READ REGISTER 
;IS **ED" SET?? 
;N0!! 

;G0 CI EAR CONTROLLER 

; STORE RHCS2 AT $8DDAT 



000000 

010000 000010 



20$: 

R0,R3 
R2.R3 
(R3).R4 

#NED.RMCS2(R0> 
70$ 

PC.CNTCLR 
RMCS2(R0) ,$BDDAT 
*NED.$8DDAT 
30$ 

(R1) ,$GDDAT 
#*CUNTMSK.$GDDAT 
#IR.$GDDAT 

ro . Sbdadr 
#rmcs2.$8dadr 

1 

60$ 

.-WRITE THE REGISTER WHOSE INDEX IS IN R2 AND EXIT TEST IF THE WRITE 
•DOES NOT SET "NED" ERROR 
30$: 

;WRITE REGISTER 
IS 'NED" SET?? 
;N0! ! 



MOV 
BIT 
BEO 



#0,(R3> 

#NED.RMCS2(R0) 
70$ 



;CC'JLD NOT READ OR WRITE THE REGISTER WITHOUT SETiNG 'NED" ERROR - 



r Z3«tCBC RM05/V2 DSKi_S 
•1 T RANS F ER TEST 



C 5 
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48 






49 






50 005612 






51 005612 


062702 


000002 


52 005616 


022702 


000002 


53 005622 


001773 




54 005624 


022702 


000004 


55 005630 


001 770 




56 005632 


022702 


000010 


57 005636 


001765 




58 005640 


022702 


0000 t 6 


59 005644 


001762 




60 005646 


022702 


000022 


61 005652 


001757 




62 005654 


022 7 02 


000046 


63 005660 


103257 




64 






65 






66 005662 






67 C05662 


013737 


0C1276 


68 005670 


104002 




69 005672 


000137 


021274 


70 






71 005676 






72 






73 







iEO 0054 



.■ADVANCE THE REGISTER INDEX 
.•AVAILABLE DEVICE REGISTER 
40$: 



001136 



ADD 
CMP 
BEO 
CMP 
BEO 
CMP 
BEO 
CMP 
BEO 
CMP 
BEO 
CMP 
BHIS 



*2.R2 
*RMWC.R2 
AOS 

#RM8A,R2 
40$ 

#RMCS2.R2 
40$ 

*RMAS.R2 
40$ 

#RMD8,R2 
40$ 

#RMEC2.R2 
10$ 



AND REPEAT THE TEST FOR THE NEXT 



ADVANCE TO NEXT REGISTER 

IS THIS RMWC?? 

YES - TRY NEXT REGISTER 

IS THIS RMBA?? 

YES - TRY NEXT REGISTER 

IS THIS RMCS2?? 

YES - TRY ANOTHER REGISTER 

IS THIS RMAS ?? 

YES - TRY ANOTHER REGISTER 

IS THIS RMD8?? 

YES - TRY ANOTHER REGISTER 

IS THIS A LEGAL REGISTER 

YES - TRY THIS REGISTER 



.GOT 'NONEXISTENT DEVICE ' ERROR FOR EVERY REMOTE REGISTER ADDRESS 
50$: 

MOV $8ASE,$BDADR .STORE BASE ADDRESS 
EMT 2 

60$: JMP $E0SP ;G0 SELECT NEXT DEVICE 

70$: 



.•TEST 2 



CTOD TEST 



005676 
005676 
005700 
005702 
005706 
005712 
005716 

74 

75 005724 

76 

77 

78 005730 

79 C05736 

80 005744 

81 005752 
82 

83 

84 005760 

85 005764 
005764 

86 005772 

87 006000 

88 006006 

89 006014 

90 006016 
91 

92 

93 006020 



000004 
000240 
012706 
013700 
013701 
012737 



TST2: 



001100 
001276 
001466 
000002 



001226 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



004 737 


022404 




JSR 








.WRITE ONES 


012760 


000076 


000000 


MOV 


012760 


1 77777 


000006 


MOV 


012760 


001777 


000034 


MOV 


012760 


016200 


000032 


MOV 








.READ REMOTE 


012702 


000001 




MOV 








10$: 


016037 


000000 


001 336 


MOV 


016037 


000006 


001 344 


MOV 


016037 


000034 


001372 


MOV 


016037 


000032 


001370 


MOV 


005302 






DEC 


100362 






BPL 








; SEE I F AN? 


042737 


177701 


001336 


BIC 



; SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$BASE,RO ;R0 = UNI8US ADDRESS 

TS7QUE.R1 ;R1 = POINTER TO DEVICE 

#2,$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 

PC.CNTCLR .60 CLEAR CONTROLLER 



IN 



REMOTE REGISTERS 
tILf76.RMCS1(R0) 
#-1,RMDA(R0) .LOAD 
#CVLMSK,RMDC(RO> 
#*CXNUOF,RMOF(R0) 



;LOAD RMCS1 
RMDA 

.-LOAD RMDC 
.-LOAD RMOF 



ONE 



#1 ,R2 

RMCS1(R0).RMCS1I 
RMDA (RO). RMDA I 
RMDC (RO). RMDC I 
RMOF (RO). RMOF I 
R2 
10$ 

BITS CAME BACK 
#-ClLF76,RMCS1I 



STORE 
STORE 
STORE 



; STORE 
RMDA IN 
RMDC IN 
RMOF IN 



RMCS1 
INPUT 
INPUT 
INPUT 



IN INPUT 
BUFFER 
BUFFER 
BUFFER 



BUFFER 



IS RMCS1 O 1 ? 



CZRMQBO RM05/3/2 DSKLS TST 2 
T2 CTOD TEST 



94 006026 

95 006030 

96 006034 

97 006036 

98 006044 

99 006046 
TOO 006054 
101 

102 

103 006056 

104 006060 
105 

106 



001014 
005737 
001011 
042737 
001005 
042737 
001001 



104003 



0 5 
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C01344 

176000 001372 
161577 001370 



SEO 0055 



BNE 20S 

TST RMDAI 

BNE 20S 

BIC 0XNUDC.RMDCI 

BNE 20S 

BIC • 0XNUOF.RMOFI 

BNE 20S 



;NOJ ! 

;IS RMDA 0?? 
•NO' ' 

•is'rmdc 0?? 
;N0!J 

;IS RMOF 0 ?? 
;N0!J 



.•CANNOT READ/WRITE A ONE FROM ANY REMOTE REGISTER 
EMT 3 

20$: 



.'•TEST 3 



MASSBUS INITIALIZE TEST 



006060 
006060 
006062 
C06064 
006070 
006074 
006100 

107 

108 006106 

109 

110 

111 006112 

112 006120 

113 006126 
114 

115 

116 006134 

117 

118 

119 006140 
720 006146 
121 006154 
122 
123 

124 006162 

125 0061 70 

126 006176 

127 006204 

128 006206 

129 006214 

130 006216 

131 006224 
132 

133 

134 006226 

135 006230 
136 

137 



000004 

000240 

012706 

013700 

013701 „ 

012737. 



TST3: 



001 100 
001276 
001466 
000003 



004737 022404 



012760 
012760 

012760,, 



000076 
177777 
177777 



004737 022404 



016037 
016037 
016037 



000000 
000014 
,000042 



001226 



000000, 

000014 

000042 



001336 
001352 
.001400 



052737 
052737 
022737 
001011 , 
022737 ' 
001005 
022737 
001001 . 



104004 



177701 
001567 , 
177777 

177777 

177777 



001336 
001400 
001336 

001352 

001400 



SCOPE 
NOP 

■ MOV , 
MOV 
MOV 
MOV - 

»»** 
..JSR / 



; SCOPE CALL 

0STACK.SP ;LOAD THE STACK POINTER 
-SBASE.RO ;R0 = UNIBUS ADDRESS 

\ TSTQUE.R1 , ,;R1 = POINTER TO DEVICE 

*3,$TESTN . % ;;SET TEST. NUMBER IN APT MAIL BOX 

PC.CNTCLR,. r»* ;G0 CLEAR CONTROLLER 



; WRITE ONES IN SELECTED REGISTERS , 
, " MOV^ ^ILF76.RMCS1(R0) * n ;LOAD RMCS1 
r . * MOV. - #-1 ,RMER1 (RO) ; LOAD RMER1 
.* 1M0V ,#-l,RMER2(R0) ^ ;LOAD RMER2 

.'INITIALIZE MASS8US WITH A, CLEAR ' ' 

JSR,;"< PC. CNTCLR ^ ;G0 CLEAR CONTROLLER 



.•READ THE REGISTERS THAT WERE WRITTEN , 

, s «#WVfP?: ;RMCS1(R0).RMCS1I * s .'STORE RMCS1 IN INPUT BUFFER 

U M0V,V^, 4 RM£R1(R0).RM£R1J . , : .-STORE RMER1 IN INPUT BUFFER 

': MOV" i- *viRMER2(R0),RMER2l < ' STORE RMER2 IN INPUT BUFFER 



;SEE IF ANY REGISTER . BITS WERE CLEARED 



BIS;,, 
BIS, 
CMPy' 
-BNE i-' 
CMP V 
BNE - 
CMP 
BNE 



**C1LF76.RMCS1I ; SET ANY BIT NOT WRITTEN 
*XNUER2,RMER2I < " * 

.-ANY ZEROS * IN RMCS1 ?? 
•YES' « > • 
•ANY" ZEROS- IN RMERI?? 
-YES' 1 

;ANY"ZEROS IN RMER2?? 



/M.RMCS1I 
10$ : 

tf-1iRMER1I 
10$ - 
0-1.RMER2I 

10$ - 



;NONE OF THE BITS WERE CLEARED 
EMT . 4 t 

10$: 



.••TEST 4 



CLEAR STUCK ACTIVE TEST 



7RMC80 RM05/3/2 DSKLS TST ? MACRO V<X.OO 
«. CLEAR S'UCK ACTIVE TEST 



006250 
006? 30 
006232 
006234 
006240 
006244 
006250 

139 0-06256 

HO 

141 

K? 006262 

143 006270 

144 006276 
145 

146 

147 006304 

148 006312 

149 006320 

150 C06326 

151 006334 

152 006336 

153 006344 

154 006346 

155 006354 

156 006356 

157 006360 
*58 

159 



000004 
000240 
012706 
013700 
013701 
012737 



012760 
012760 
012760 



016037 
016037 
016037 
042737 
001011 
042737 
001005 
032737 
C01001 
104026 



001100 
001276 
001466 
000004 



004737 022404 



U7777 
W7777 
000001 



0000 1 4 
000042 
000024 
040000 



001226 



000014 
000042 
000024 



001352 
001400 
001 362 
001352 



040200 001400 
000001 001362 



TST4: 





E 


5 




APR-81 


01 : 29: 56 PAGE 


1 3- 


■3 


SCOPE 






; SCOPE CALL 


NOP 








MOV 


ATSTACK.SP 




.-LOAD THE STACK POINTER 


MOV 


tBASC.RO 




;R0 = UNI8US ADDRESS 


MOV 


TSTQUE ,R1 




;R1 = POINTER TO DEVICE 


MOV 


*4.$TESTN 




; .SET TEST NUMBER IN APT MAIL BOX 


JSR 


PC.CNTCLR 




;G0 CLEAR CONTROLLER 



StO 0056 



.•WRITE ONES IN TEST REGISTERS 

MOV AM.RMERKRO) ;LOAD RMER1 

MOV *-l.RMER?(RO) ; L OAD RMER2 

MOV #DMD,RMMRKRO) ;LOAD RMMR1 

.READ TEST REGISTERS AND SEE IF ANY BITS ARE ON 



10$ : 



MOV 


RMER1 (RO) .RMER1 I 


.-STORE RMER1 IN INPUT 


BUFFER 


MOV 


PMER2(R0).RMER2I 


; STORE RMER2 IN INPUT 


BUFFER 


MOV 


RMMR1(R0).RMMR1I 


; STORE RMMR1 IN INPUT 


BUFFER 


BIC 


#UNS,RMER1I 


;DONT ACCEPT UNSAFE 




BNE 


10$ 


; BRANCH IF ANV OTHER BITS ON 




BIC 


#SKI!DVC,RMER2I 


;DONT ACCEPT SKI OR DVC 




BNE 


10$ 


; BRANCH IF ANV OTHER BITS ON 




BIT 


#DMD,RMMR1I 


; BRANCH IF DMD IS ON 




BNE 


10$ 






EMT 


26 







.••TEST 5 



TRISTATE TRANSFER TEST 



006360 
006360 
006362 
006364 
006370 
006374 
006400 



000004 
000240 
012706 
013700 
013701 
012737 



TST5: 



001100 
001276 
001466 
000005 



001226 



160 








161 006406 


005002 






162 006410 


004737 


022404 




163 








164 








165 006414 


012760 


000076 


OOOOOO 


166 006422 


012760 


-\77777 


000006 


167 006430 


012760 


\77777 


000014 


168 006436 


012760 


1 77777 


000032 


169 006444 


012760 


1 77777 


000042 


170 








171 








172 006452 


012760 


oooooo 


OOOOOO 


173 006460 


012760 


000000 


000006 


174 006466 


012760 


OOOOOO 


000014 


175 006474 


012760 


OOOOOO 


000032 


1 76 006502 


012760 


OOOOOO 


000034 


177 006510 


012760 


OOOOOO 


00004? 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



CLR 
JSR 

,-WRITE ONES 
MOV 
MOV 
MOV 
MOV 
MOV 

,-WRITE ZEROS 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



.-SCOPE CALL 

#STACK.SP .LOAD THE STACK POINTER 

$8ASE,R0 ;R0 = UNIBUS ADDRESS 

TSTQUE. R1 ;R1 = POINTER TO DEVICE 

#5.$TESTN ;.SET TEST NUMBER IN APT MAIL BOX 

R2 .-CLEAR ERROR FLAGS 

PC.CNTCLR ;G0 CLEAR CONTROLLER 



IN SELECTED REGISTERS 
#JLF76,RMCSKR0) 
#-1.RMDA(R0) .'LOAD RMDA 
*-1 .RMER1 <R0) ;LOAD RMER1 
#-1.RMOF(R0) ;LOAD RMOF 
#-1.RMER2(R0) .-LOAD RMER2 

IN SELECTED REGISTERS 

fO.RMCSKRO) ;LOAD RMCS1 

#O.RMDA(RO) .-LOAD RMDA 

#0.RMER1(R0) ;LOAD RMER1 

JO.RMOFfRO) .-LOAD RMOF 

*O.RMDC(RO) ;LOAD RMDC 

#0.RMER2(R0) ;LOAD RMER2 



;LOAD RMCS1 



'ZRMQBO RM05/V2 DSKLS TST 2 
TS trisTATE TRANSFER TEST 



MACRO VOA.OO 



F 5 

4-APR-81 01:29:56 PAGE 13-4 



SEO 0057 



'79 
80 
8 1 
82 
83 
84 
85 
86 
87 
88 
39 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 



214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 



006516 
006524 
006532 
006540 
006546 
006554 



006562 
006566 
006574 
006602 
006610 
006616 
006622 
006626 
006632 
C06636 
006642 
006646 
006652 
006656 
006662 
006666 
006672 
006676 



006700 
006704 
006710 
006712 

006716 
006716 



006722 
C06730 
006736 



006744 
006752 
006760 
006766 
006774 
007002 



007010 
007016 
007024 
0070^2 



01603/ 
016037 
016037 
016037 
016037 
016037 



012702 
052737 
052737 
052737 
052737 
005137 
005137 
005137 
005157 
005137 
005137 
043702 
043702 
043702 
043702 
043702 
043702 
001407 



010237 
005037 
1 04005 
052702 



004737 



012760 
012760 
012760 



012760 
012760 
012760 
012760 
012760 
012760 



016037 
01603? 
016037 
016037 



000000 
000006 
000014 
000032 
000034 
000042 



177777 
177701 
161577 
1 76000 
001567 
001336 
001344 
001352 
001370 
0C1372 
001400 
001336 
001 344 
001352 
001370 
001372 
001400 



001142 
001140 

000001 
022404 



000000 
000000 
000000 



000076 
177777 
016200 
001777 
177777 
176210 



000000 
000006 
000032 
000034 



001336 
001344 
001352 
001370 
001372 
OOHOO 



001336 
001 370 
001372 
001400 



000006 
000032 
00003* 



000000 
000006 
000032 
000034 
000014 
000042 



001336 
001344 
001370 
001372 



;READ BACK ALL REGISTERS 

MOV RMCS1(R0),RMCS1I /STORE RMCS1 IN INPUT BUFFER 

MOV RMDA(RO) .RMDAI ; STORE RMDA IN INPUT BUFFER 

MOV RMER1 (RO) .RMER1 I ; STORE RMER1 IN INPUT BUFFER 

MOV RMOF (RO), RMOF I ; STORE RMOF IN INPUT BUFFER 

MOV RMDC (RO), RMDC I ; STORE RMDC IN INPUT BUFFER 

MOV RMER2(R0),RMER2I ; STORE RMER2 IN INPUT BUFFER 

; CHECK EACH REGISTER CONTENT FOR ZERO BITS WRITTEN & READ 

MOV #-1.R2 .-ACCUMULATE ZEROS IN R2 

BIS #*CILF76.RMCS11 ;SET ALL BITS NOT WRITTEN 

BIS #XNUOF,RMOFI 

BIS /TXNUDC.RMDCI 

BJS #XNUER2,RMER2I 

COM RMCS1I ; COMPLEMENT REGISTER CONTENTS 

COM RMDAI 

COM RMER1 I 

COM RMOF I 

COM RMDCI 

COM RMER2I 

BIC RMCS1I.R2 ; ACCUMULATE ALL ZERO BITS 

BJC RMDAI ,R2 

BIC RMER1 I ,R2 

BJC RM0FJ,R2 

BJC RMDCI. R2 

BIC RMER2I.R2 

BEG 10S .-BRANCH IF EACH BIT IS ZERO 

.ONE OR MORE BIT POSITIONS ARE NOT ZERO 



10S: 



MOV 

CLR 
EMT 
BIS 



JSR 



R2.J8DDAT 
SGDDAT 

5 

#8IT0,R2 



PC.CNTCLR 



; SAVE RESULT FOR TYPE 
.-LOAD EXPECTED RESULT 

;SET ERROR FLAG 



;G0 CLEAR CONTROLLER 



.PRESET SELECTED REGISTERS TO ZEROS 
.-(ASSUME RMCS1 . RMER1 , RMER2 WERE CLEARED BY JNIT) 



MOV 

MOV 
MOV 



#0,RMDA(RO) 
#0.RMOF(R0) 
#0,RMDC(RO) 



LOAD RMDA 
LOAD RMOF 
LOAD RMDC 



.-WRITE ONES IN SELECTED REGISTERS 

MOV #JlF76,RMCS1(R0) ;LOAD RMCS1 

MOV #-1.RMDA(R0) .LOAD RMDA 

MOV #*CXNUOF.RMOF(R0) ;LOAD RMOF 

MOV # A CXNUDC,RMDC(RO) ;LOAD RMDC 

MOV #-1,RMER1(R0) ;LOAD RMER1 

MOV #*CXNUER2,RMER2(R0) ;LOAD RMER2 



.-READ ALL REGISTERS 

MOV RMCSKR0).RMCS1I 
MOV RMDA (RO) .RMDAI 
M0>/ RMOF ( RO ) , RMOF I 
MOV RMDC (RO). RMDC I 



.-STORE RMCS1 IN INPUT BUFFER 
STORE RMDA IN INPUT BUFFER 
STORE RMOF IN INPUT BUFFER 
STORE RMDC IN INPUT BUFFER 



ZWQBO RM05/3/2 DSKLS TST 2 

TRJSTATE TRANSFER T E S T 



?34 


007040 


016037 


000014 


001352 


235 


00 7 046 


016037 


C00042 


001400 


236 










237 










238 


007054 


042737 


177701 


001336 


239 


007062 


042737 


161577 


001370 


240 


007070 


042737 


1 76000 


001 372 


241 


007076 


042737 


001567 


001400 


242 


007104 


005002 






243 


007106 


053702 


001336 




244 


007112 


053702 


001344 




2«*5 


007116 


053702 


001370 




246 


007122 


053702 


001 372 




24 7 


007126 


053702 


001352 




248 


0071 32 


053702 


001400 




249 


0071 36 


022702 


1 77777 




250 


007142 


001410 






251 










252 










253 


C07144 


010237 


0C1H2 




254 


007150 


012737 


1 77777 


001140 


255 


007156 


104006 






256 


007160 


052702 


000002 




257 


007164 








258 


007164 


005702 






259 


007166 


001126 






260 


007170 


012702 


000001 




261 










262 


007174 










007174 


004737 


022404 




263 










26* 










265 


007200 


010260 


000006 




266 


007204 


010260 


000032 




267 


007210 


010260 


000034 




268 


007214 


010260 


000014 




269 


007220 


010260 


000042 




270 










271 










272 


007224 


016037 


000006 


001 344 


271 


007232 


016037 


000032 


001370 


27U 


007240 


016037 


000034 


001372 


275 


007246 


016037 


000014 


001352 


276 


007254 


016037 


000042 


001400 


277 










278 










279 


007262 


005003 






280 


007264 


012704 


1 77777 




281 


007270 


01 3705 


001 344 




282 


007274 


050503 






283 


007276 


005105 






284 


007300 


04C504 






285 


007302 


013705 


001 370 




286 


007306 


042705 


161577 




287 


007312 


050503 






288 


007314 


005105 






289 


007316 


042705 


161577 
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MOV RMER1 (R0),RMER1I 
MOV RMER2(R0).RMER2I 



SEO 0058 



."STORE RMER1 IN INPUT BUFFER 
;STORf RMER2 IN INPUT SUFFER 



:CHECK EACH REGISTER CONTENT FOR ONE BITS WRITTEN & READ 



BIC #*CILF76,RMCS1I 

BIC #XNUOF.RMOFI 

BIC #XNUDC,RMDCI 

BK #XNUER2.RMER21 

CLR R2 

BIS RMCS1I.R2 

BIS RMDAI.R2 

BIS RM0FI.R2 

BIS RMDCI.R2 

BIS RMER1I.R2 

BIS RMER2I.R2 

CMP #-1 ,R2 

BEQ 20$ 



•CLEAR ALL BITS NOT WRITTEN 



.'ACCUMULATE ONES IN R2 

.•ACCUMULATE ALL ONE BITS 



; SEE IF 
.•BRANCH 



.-ONE OR MORE BIT POSITIONS ARE NOT ONE 



20$: 



25$: 



MOV 
MOV 
EMT 
BIS 

1ST 
BNE 
MOV 



JSR 



R2.$8DDAT 
#-1.$GDDAT 
6 

*8IT1.R2 

R2 

30$ 

#1.R2 



PC.CNTCLR 



EACH BIT POSITION WAS ONE 
IF NONE STUCK 



;SAVE RESULT FOR TYPE 
.'EXPECTED RESULT 



;SET ERROR FLAG 

;ANY ERRORS DETECTED ?? 
;VES - DONT DO BIT TEST 
;R2=8IT POSITION 



;G0 CLEAR CONTROLLER 



;WRITE THE BIT PATTERN IN SELECTED DEVICE REGISTERS 



MOV 


R2.RMDA(R0) 


.-LOAD 


RMDA 


MOV 


R2.RMOF(R0) 


.'LOAD 


RMOF 


MOV 


R2.RM0C(R0) 


.LOAD 


RMDC 


MOV 


R2.RMERKR0) 


;LOAO 


RMER1 


MOV 


R2.RMER2(R0) 


;LOAD 


RMER2 



.READ BACK THE REGISTERS 
MOV 
MOV 
MOV 
MOV 
MOV 



RMOA(RO) ,RMDAI ; STORE RMDA IN INPUT BUFFER 

RMOF CRO) .RMOF I ;STORE RMOF IN INPUT BUFFER 

RMDC (RO), RMDC 1 .'STORE RMDC IN INPUT BUFFER 

RMER1 (RO) .RMER1 1 .'STORE RMER1 IN INPUT BUFFER 

RMER2(R0).RMER2I .'STORE RMER2 IN INPUT BUFFER 



iCHECK REGISTER CONTENTS FOR CORRECT PATTERN 



CLR 
MOV 
MOV 
BIS 
COM 
BIC 
MOV 
BIC 
BIS 
COM 
BIC 



R3 
#-1.R4 
RMDAI.R5 
R5.R3 
R5 

R5.R4 

RM0FI.R5 

#XNU0 F .R5 

R5.R3 

R5 

#XNU0F .R5 



;R3=AC CUMULATED ONE BIT 
;R4=AC CUMULATED ZERO BITS 

;GET ANY GOOD BITS FROM RMDA 



;GET GOOD BITS FROM RMOF 



Z*MQBG RM05/V2 DSKLS TST ? 

TR J ST ATE TRANS'ER TEST 



MACHO VQ4.00 



H 5 
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SEO 0059 



290 

29"! 

292 

295 

294 

295 

2% 

297 

298 

299 

300 

501 

302 

303 

304 

305 

306 

307 

308 

509 

310 

311 

312 

515 

3K 

315 

316 

317 

318 

519 

520 

52i 

522 

323 

324 

325 

526 



007322 
007524 
007550 
007534 
007336 
007540 
007544 
007546 
007552 
007354 
007356 
007360 
007564 
007570 
007572 
007574 
007400 
007402 
007404 
C07406 
007410 
007412 
007414 
007416 
007420 
007424 
007450 
007452 



007454 
007454 
007456 
007440 
007444 



040504 
013705 
042 7 05 
050503 
005105 
042705 
040504 
013705 
050503 
005105 
040504 
015705 
042705 
050505 
005105 
042705 
040504 
010205 
005105 
0<.0505 
040204 
050405 
020502 
001406 
010257 
010557 
104007 
000404 



006502 
001402 
000157 



001572 
176000 



176000 
001352 



001400 
001 567 



001567 



001140 
001142 



007174 



26$: 



30$: 



BIC 

OH 


R5.R4 




MOV 


RMDCI R5 


•GET 'JOOD BITS FROM RMOC 


BIC 


#XNUDC ,R5 


BIS 


R5.R3 




COM 


R5 




BIC 


#XNUDC ,R5 




BIC 


R5.R4 




MOV 


RMER1 I R5 


-GET GOOD BITS FROM RMER1 


BIS 


R5 R3 




COM 


R5 




BIC 


R5.R4 




MOV 


RMER2I .R5 


;GET GOOD BITS FROM RMER2 


BIC 


#XNUER2.R5 


BIS 


R5.R3 




COM 


R5 




BIC 


#XNUE C *2.R5 




BIC 


R5.R4 




MOV 


R2.R5 


.'RESET ALL ONES IN R3 EXCEPT 


COM 


R5 


;F0R THE TEST BIT 


BIC 


R5.R5 


BIC 


R2.R4 


; RE SE T TEST BIT IN R4 


BIS 


R4.R3 


;C0MBINE ACCUMULATED TS ♦ O'S 


CMP 


R5.R2 


; IS PATTERN OK?? 


BEQ 


26$ 


;YES!! 


MOV 


R2.SGDDAT 


;SAVE TEST PATTERN 


MOV 


R3.S8DDAT 


;SAVE RESULT 


EMT 


7 




BR 


30S 


.-SKIP TO NEXT 


E R2 TO 


THE NEXT PATTERN 


AND REPEAT TEST 


ASL 


R2 


; SHIFT THE BIT 


BEQ 


30S 


;EXIT IF DONE 


JMP 


25$ 





;»TEST 6 



REGISTER SELECT TEST 



327 
328 
529 
330 
351 
552 
333 
334 
335 
356 



007444 
007444 
007446 
007450 
007454 
007460 
007464 



000004 
000240 
012706 
015700 
015701 
012757 



001100 
001276 
001466 
000006 



TST6: 



001226 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



#STACK.SP 
$8ASE.R0 
TSTQUE,R1 
*6.$TESTN 



; SCOPE CALL 

LOAD THE STACK POINTER 

RO = UNI BUS ADDRESS 

R1 = POINTER TO DEVICE 

;SET TEST NUMBER IN APT MAIL BOX 



THE FOLLOWING TABLE GIVES MASSBUS REGISTER SELECT VALUES FOR 
EACH DEVICE REGISTER 



REGISTER 
NAME 

RMCS1 

RMD5 

RMER1 



REG SFL 
(16.8.4.2.1) 

00000 
00001 
00010 



'ZRMOBO HM05/3/2 DSKLS T S T 2 
'6 REGISTER SELECT T E ST 
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SfO 0060 



33 7 










338 










339 










3A0 










3A1 










3A? 










3A3 










3AA 










3a S 










3A6 










3A7 










3-8 










3A9 










350 










351 










352 










353 










35A 










355 










356 










357 










358 










359 










360 


007A72 


00500? 






361 


007A7A 


01?703 


1 77777 




362 










363 










36A 










365 


007500 


00A737 


022A0A 




366 


00750A 


010?60 


00001 A 




367 


007510 


010?60 


0000 3 A 




368 


00751 A 


010360 


00002A 




369 


007520 


010360 


000036 




370 


00752A 


016037 


00001 A 


00135? 


371 


00753? 


016037 


00003A 


00137? 


372 


0075A0 


0?0337 


001352 




373 


0O75AA 


001007 






37A 


0075A6 


05?737 


1 76000 


00137? 


375 


0075 5A 


0?0337 


001372 




376 


007560 


001001 






377 


00756? 


10A010 






378 










379 










380 


00756A 








381 


00756A 


OOA737 


02?A0A 




38? 


007570 


01C?60 


000006 




383 


00757A 


010?60 


00003? 




38A 


007600 


010?60 


OOOOA? 




385 


00760A 


010360 


000016 




386 


007610 


010360 


000030 




387 


00761 A 


010360 


OOOOAO 




388 


0076?0 


016037 


000006 


001 3AA 


389 


007626 


016037 


00003? 


001370 


390 


00763A 


016037 


OOOOA 2 


001 AOO 


391 


0076A? 


0?0337 


001 3AA 




39? 


0076A6 


001015 






393 


007650 


052737 


161577 


001370 



RMMR1 

RMAS 

RMDA 

RMDT 

RMLA 

RMSN 

RMOF 

RMDC 

RMHR 

RMMR2 

RMER2 

RMEC1 

RMEC2 



00011 
00100 
00101 
00110 
00111 
01000 
01001 
01010 
01011 
01100 
01101 
01110 
01111 



EACH REGISTER SELECT LINE IS TESTED FOR A STUCK AT ONE , 
STUCK AT ZERO FAULT. AS AN EXAMPLE , TO TEST REG SEL 1. 
FOR S-A-O, RMER1 IS WRITTEN WITH ZEROS. THEN THE REGISTER 
THAT HAS THE SAME SELECT VALUE, EXCEPT FOR THE SELECT LINE 
BEING TESTED. IS WRITTEN WITH ONES. IN THIS EXAMPLE, 
RMMR1 IS WRITTEN WITH ONES. IF SELECT LINE 1 IS S-A-O. 
THE ALL ONES WORD WILL BE WRITTEN IN RMER1, AND RMER1 
WILL NOT BE 0 WHEN READ BACK. 



CLR 
MOV 



R2 

#-1.R3 



;R2= ZEROS SOURCE 
;R3= ONES SOURCE 



TEST REG SEL 1 FOR S-A-0 



JSR PC.CNTCLR 

MOV R2.RMERKR0) 

MOV R2.RMDCCR0) 

MOV R3.RMWRKR0) 

MOV R3.RMHRCR0) 

MOV RM£RKR0),RMER11 

MOV RMDC (R0>. RMDC I 

CMP R3.RMER1 I 

BNfc 10* 

BIS #XNUDC,RMDCI 

CMP R3.RMDCI 

BNE 10S 

EMT 10 

;TEST REG SEL 1 FOR S-A-1 
10$: 

JSR PC.CNTCLR 

MOV R?,RMDA(RO) 

MOV R?,RMOF(RO) 

MOV R?,RMER?(RO) 

MOV R3.RMAS(R0) 

MOV R3.RMSN(R0) 

MOV R3,RMMR2(R0) 

MOV RMDA(RO) .RMDAI 

MOV RMOF(RO),RMOFI 

MOV RMER?(R0),RMER2I 

CMP R 3. RMDAI 

8NE 20* 

81 S 0XNUOF , RMOF I 



GO CLEAR CONTROLLER 
LOAD RMER1 
LOAD RMDC 
LOAD RMMR1 
LOAD RMHR 

.-STORE RMER1 
.-STORE RMDC IN INPUT 



IN INPUT 
BUFFER 



BUFFER 



GO CLEAR CONTROLLER 
LOAD RMDA 
LOAD RMOF 
LOAD RMER2 
LOAD RMAS 
LOAD RMSN 
LOAD RMMR2 
STORE RMDA IN 
STORE RMOF IN 



.-STORE 



INPUT 
INPUT 
RMER2 



BUFFER 
BUFFER 
IN INPUT 



BUFFER 



r ZRMQBO RM05/3/2 DSKLS TST 2 
T 6 REGISTER SELECT TEST 



394 007656 

395 007662 

396 007664 

397 007672 

398 007676 

399 007700 
400 

401 

402 007702 

403 007702 

404 007706 

405 007712 

406 007716 

407 007722 

408 007726 

409 007732 

410 007736 

411 007744 

412 007752 

413 007760 

414 007764 

415 007766 

416 007774 

417 010000 

418 010002 

419 010010 

420 010014 

421 010016 
422 

423 

424 010020 
42b 010020 

426 010024 

427 010030 

428 010034 

429 010042 

430 010046 

431 010054 

432 010062 

433 010070 

434 010074 

435 010076 

436 010104 

437 010110 

438 010112 
439 

440 

441 010114 

442 010114 

443 010120 

444 010124 

445 010130 

446 010134 

447 010140 

448 010144 

449 010150 

450 010156 



020337 
001007 
052737 
020337 
001001 
104011 



004737 
010260 
010260 
010260 
010360 
010360 
010360 
016037 
016037 
016037 
020337 
001015 
052737 
020337 
001007 
052737 
020337 
001001 
104012 



004737 
010260 
010260 
012760 
010360 
016037 
016037 
052737 
020337 
001007 
052737 
020337 
001001 
104013 



004737 
010260 
010260 
010260 
010360 
010360 
010360 
016037 
016037 



00 i 370 

001567 
001400 



022404 
000006 
000032 
000042 
000020 
000036 
000046 
000006 
000032 
000042 
001344 

161577 
001370 

001567 
001400 



022404 
000014 
000034 
000076 
000030 
000014 
000034 
177701 
001352 

176000 
001372 



022404 
000014 
000032 
000034 
000026 
000042 
000044 
000014 
000032 



MACRO V04.00 



001400 



20$: 
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SfQ 0061 



001344 
001370 
001400 



001370 
001400 



; TEST 
30$: 



000000 

001352 
001372 
001352 



001372 



40$: 



001352 
001370 



I Fir 




Rj.RMUr I 






BNE 




20$ 






QIC 

BIS 




wANUtnt .KMERcM 






CMP 




R3.RMER2I 






BNE 




20$ 






EMT 




11 






REG SEL 


2 


FOR S-A-0 






JSR 




PC.CNTCLR 


GO CLEAR CONTROLLER 


MOV 




R2.RMDA(R0) 


LOAD RMDA 




MOV 




R2.RMOF(R0) 


LOAD RMOF 




MOV 




R2.RMER2(R0) 


LOAD R/*IEH<r 




MOV 




R3,RMLA(R0) 


LOAD RMLA 




MOV 




R3,RMHR(R0) 






MOV 




R3,RMEC2(R0) 


LOAD RMEC2 




MOV 




RMDA(RO) .RMDAI 


STORE RMDA IN 


INPUT 


MOV 




RMOF (RO), RMOF I 


STORE RMOF IN 


INPUT 


MOV 




RMER2(R0),RMER2J 


; STORE 


RMER2 


CMP 




R3.RMDAI 




BNE 




30$ 






BIS 




#XNUOF,RMOFI 






run 










BNE 




30$ 






QIC 




n AnRJt Kc ( KPIt ncl 






CMP 




R3.RMER2I 






BNE 




30$ 






EMT 




12 






REG SEL 


2 


FOR S-A-1 






JSR 




PC.CNTCLR ;G0 CLEAR CONTROLLER 


MOV 




R2.RMERKR0) ;L0AD RMER1 




MOV 




R2.RM0C(R0) ;L0AD RMDC 




MOV 




#ILF76,W1CS1(R0) 


.-LOAD RMCS1 


MOV 




R3,RMSN(R0) 


.•LOAD RMSN 




MOV 




RMER1 (RO).RMERII 


; STORE 


RMER1 


MOV 




RMDC(RO) , RMDC I -STORE RMDC IN 


INPUT 


BiS 




f*CJLF76.RM£R1I 






ryn 

Lnr 




R3.RMER1I 






BNE 




40$ 






ore 




#XNUDC,RMDCl 






CMP 




R3.RM0CI 






BNE 




40$ 






EMT 




13 






REG SEL 


4 


FOR S-A-0 






JSR 




PC.CNTCLR 


;G0 CLEAR CONTROLLER 


MOV 




R2.RMERKR0) 


.LOAD RMER1 




MOV 




R2.RMOF(R0) 


;L0AD RMOF 




MOV 




R2.RMDC(R0> 


;L0AD RMDC 




MOV 




R3.RMDT (RO) 


;L0AD RMDT 




MOV 




R3.RMER2(R0) 


; LOAD RMER2 




MOV 




R3.RMECKR0) 


.LOAD RMEC1 




MOV 




RMER1 (RO) ,RMER1 I 


; STORE 


RMER1 


MOV 




RMOf (RO).RMOFI 


; STORE RMOF IN 


INPUT 



IN INPUT BUFFER 



IN INPUT 
BUFFER 



BUFFER 



r ZRMQB0 RM05/3/2 DSKLS T ST 2 
T 6 REGISTER SELECT TEST 
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SEO 006? 



451 


010164 


016037 


000034 


001372 


452 


010172 


020337 


001352 




453 


010176 


001015 






454 


010200 


052737 


161577 


001370 


455 


010206 


020337 


001 370 




456 


010212 


001007 






457 


010214 


052737 


1 76000 


00137? 


w58 


010222 


020337 


001372 




459 


010226 


001001 






460 


010230 


104014 






461 










4e,2 










463 


010232 








464 


010232 


004737 


022404 




465 


010236 


010260 


000006 




466 


010242 


010260 


000042 




467 


010246 


010360 


00001 2 




468 


010252 


010360 


000032 




<.69 


010256 


016037 


000006 


001344 


470 


C10264 


016037 


000042 


001400 


471 


010272 


020337 


001344 




472 


010276 


001007 






473 


010300 


052737 


001567 


001400 


474 


010306 


020337 


001400 




475 


010312 


001001 






476 


010314 


104015 






477 










478 










479 


010316 








480 


010316 


004737 


022404 




481 


010322 


010260 


000014 




482 


010326 


010260 


000006 




483 


010332 


010360 


000034 




484 


010336 


010360 


000042 




485 


010342 


016037 


000014 


001352 


486 


010350 


016037 


000006 


001344 


487 


010356 


020337 


001352 




488 


010362 


001004 






489 


010364 


020337 


001 344 




490 


010370 


001001 






491 


010372 


104016 






492 










493 










494 


010374 








495 


010374 


004737 


022404 




496 


010400 


010260 


000032 




497 


010404 
010410 


010260 


000034 




498 


010260 


000042 




499 


010414 


010360 


000012 




500 


010420 


010360 


000014 




501 


010424 


010360 


000006 




502 


010430 


016037 


000032 


001370 


503 


010436 


016037 


000034 


001372 


504 


010444 


016037 


000042 


001400 


505 


010452 


052737 


161577 


001370 


506 


010460 


001015 






507 


010462 


022737 


1 76000 


001372 



: TEST 
50$: 



MOV RMDC(RO) .RMDCJ 

CMP R3.RMER1 I 

BNE 50$ 

8JS #XNUOF,RMOFJ 

CMP R3.RM0F1 

BNE 50$ 

BIS #XNUDC.RMDC1 

CMP R3.RMDCI 

BNE 50$ 

EMT 14 

REG SEl 4 FOR S-A-1 

JSR PC.CNTCLR 

MOV R2.RMDA(R0) 

MOV R2,RM£R2(R0) 

MOV R3,RMDS(R0) 

MOV R3.RM0F(R0) 

MOV RMDA(RO) .RMDAI 

MOV RMER2(R0).RMER2I 

CMP R3. RMDAI 

BNE 6v$ 

BIS *XNU£R2.RMER2I 

CMP R3.RMER2I 

BNE 60$ 

EMT 15 



; TEST REG SEL 8 FOR S-A-0 
60$: 



.-STORE RMDC IN INPUT BUFFER 



GO CLEAR CONTROLLER 
LOAD RMDA 
LOAD RMER2 
LOAD RMDS 
LOAD RMOF 

STORE RMDA IN INPUT BUFFER 

; STORE RMER2 IN INPUT BUFFER 



JSR 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CMP 
BNE 
CMP 
BNE 
EMT 



PC.CNTCLR 

R2.RMERKR0) 

R2.RMDA(R0) 

R3.RMDC(R0) 

R3.RMER2(R0) 



;G0 CLEAR CONTROLLER 
;LOAD RMER1 
.LOAD RMDA 
.LOAD RMDC 
.LOAD RMER2 

RM£RKR0>,RMER1I ;STORE RMER1 IN INPUT BUFFER 

RMDA(RO) .RMDA I ; STORE RMDA IN INPUT BUFFER 
R3.RMER11 
70$ 

R3.RMDAI 

70$ 

16 



; TEST 
70$: 



REG SEL 8 FOR S-A-1 

JSR PC.CNTCLR 

MOV R2.RM0F(R0) 

MOV R2.RMDC(R0) 

MOV R2.RMER2(R0) 

MOV R3,RMDS(R0) 

MOV R3.RMER1 (RO) 

MOV R3.RMDA(R0) 

MOV RMOF (RO). RMOF I 

MOV RMDC (RO) .RMDC I 

MOV RMER2(R0) .RMER2I 

BIS #XNUOF.RMOFI 

BNE 80$ 

CMP #XNUDC,RMDCI 



GO CLEAR CONTROLLER 
LOAD RMOF 
LOAD RMDC 
LOAD RMER2 
LOAD RMDS 
LOAD RMER1 
LOAD RMDA 
STORE RMOF IN 
STORE RMDC IN 
; STORE 



INPUT BUFFER 
INPUT BUFFER 
RMER2 IN INPUT BUFFER 
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010470 
010474 
010476 
010504 
010510 
010512 
010514 



508 
509 
510 
511 
512 
513 
514 
515 
516 
517 

518 



010514 
0105H 
010516 
010520 
010524 
C10530 
010534 

519 

520 010542 

521 010546 

522 010552 

523 010554 

524 010560 
525 

526 010562 

527 010566 

528 010570 

529 010574 
530 

531 



010576 

532 010602 

533 010604 

534 010610 
535 

536 010612 

537 010616 

538 010622 

539 010630 

540 010632 

541 010636 
542 

543 



010636 
010636 
010640 
010642 
010646 
010652 
010656 



020337 
001007 
052737 
020337 
001001 
104017 



000004 
000240 
012706 
013700 
013701 
012737 

016002 
022702 
001431 
022702 
001426 

022702 
001423 
022702 
001420 

022702 
001415 
022702 
001412 

010237 
010037 
062737 
104057 
000137 



544 



000004 
000240 
012706 
013700 
013701 
012737 



001372 

001567 
001400 



001100 
001276 
0C1466 
000007 

000026 
020024 

024024 



020025 
024025 

020027 
024027 



001142 
001136 
000026 

021274 



001100 
001276 
001466 
000010 



SEO 0063 



001400 



80$: 



CMP R3.RMDCI 

BNE 80$ 

BIS #XNUER2,RMER2I 

CMP R3.RMER21 

BNF 80$ 

EMT 17 



.•REGISTER SELECT 16 IS TESTED BY THE ILR TEST 
• *TEST 7 DRIVE TYPE TEST 



TST7: 



001226 



001136 





SCOPE 




.•SCOPE CALL 




NOP 








MOV 


#STACK,SP 


;LOAD THE STACK POINTER 




MOV 


S8ASE.R0 


;R0 = UNJBUS ADDRESS 




MOV 


TSTQUE ,R1 


;R1 = POINTER TO DEVICE 




MOV 


#7.$TESTN 


;;SET TEST NUMBER IN APT MAIL BOX 




MOV 


RMDT(R0).R2 


; STORE RMDT AT R2 




CMP 


#SNGPRT,R2 


; SINGLE PORT RM03 ? 




be a 


10$ 


;YES !• 




CMP 


#DULPRT,R2 


;DUAL PORT RM03 ? 




BEQ 


10$ 


;YES !! 




CMP 


#SNGPRT!BIT0,R2 


.-SINGLE PORT RM02 ? 




BEQ 


10$ 


• YES ' 1 




CMP 


#DULPRT!BIT0.R2 


; DUAL PORT RM02 ? 




BEQ 


10$ 


;YES !! 




CMP 


#SNGPRT:BIT1!8IT0.R2 ; SINGLE PORT RM05 ? 




BEQ 


10$ 


;YES !! 




CMP 


#DULPRT!BIT1!8IT0.R2 .DUAL PORT RM05 ? 




BEQ 


10$ 






MOV 


R2.$BDDAT 


;GET RECJEVED DRIVE TYPE 




MOV 


R0.$8DADR 


;LOAD BAD ADDRESS 




ADD 


#RMDT.$BDADR 






EMT 


57 




$: 


JMP 


$EOSP 


;G0 TO NEXT DEVICE 


TEST 


10 


DEVICE AVAILABLE 


TEST 



TST10: 



001226 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



.-SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$8ASE.R0 ;R0 = UNJBUS ADDRESS 

TSTQUE. R1 ;R1 = POINTER TO DEVICE 

#10.$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 



CZRMQBO RM05/3/2 DSKLS 1ST 2 
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545 
546 
547 
548 
549 
550 
551 
552 
553 
554 



010664 
010670 
010676 
010704 
010706 
010714 
010720 
010722 



004737 
016037 
042737 
001006 
012737 
010037 
104060 



022404 
000000 
173777 

004000 
001 1 36 



555 
556 
557 
558 
559 
560 
561 
562 
563 
564 



010722 
010722 
010724 
010726 
010732 
010736 
C 10742 



010750 
010756 
010764 
010772 
011000 
011006 



000004 
000240 
012706 
01 3700 
013701 
012737 



012737 
012737 
C12737 
012737 
012737 
012737 



001100 
001276 
001466 
000011 



000000 
000000 
010000 
054636 
1 77777 
000061 



011014 004737 022432 



MACRO V04.00 4-APR-81 01:29:56 



M 

PAGE 
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SEQ 0064 



001142 
001142 

001140 



10$: 



JSR 
MOV 
BIC 
BNE 
MOV 
MOV 
EMT 



PC.CNTCLR ;G0 CLEAR CONTROLLER 

RMCS1 (RO) ,$8DbAT ; STORE RMCS1 AT $8DDAT 



#*CDVA.$BDDAT 
10$ 

#DVA.$GDDAT 

RO.$BDADR 

60 



; CLEAR ALL BUT DVA 
; BRANCH If DVA SET 
.-SETUP EXPECTED 
.-SETUP REG ADDRESS 



; *TEST 11 



SEARCH TIMEOUT TEST 



TST11 



001226 



001420 
001446 
001444 
001416 
001414 
001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



;SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$8ASE.R0 ;P0 - UNJ8US ADDRESS 

TSTQUE.R1 ;R1 = POINTER TO DEVICE 

#11.$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 



.-LOAD REGISTER OUTPUT BUFFER WITH COMMAND PARAMETERS 



011020 


000402 






011022 


104000 






565 011024 


000462 






566 








567 








568 011026 








560 011026 


012737 


000144 


001 534 


011034 


004777 


170476 




570 011040 


005737 


001 534 




571 011044 


001375 






572 011046 


004777 


170466 




573 








574 








575 011052 


016037 


000014 


001142 


576 011060 


010037 


001136 




577 011064 


062737 


000014 


001136 


578 011072 


042737 


157777 


001142 


579 011100 


001404 






580 011102 


005037 


001140 




581 011106 


104020 






582 








583 011110 


000430 






584 








585 








586 011112 








587 011112 


012760 


041401 


000024 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 

BR 

EMT 

BR 



#O.RMDAO 
#O,RM0CO 
#FMT16.RM0F0 
#8UFFER»RMBA0 
#-1 ,RMWCO 
#WD.'G0.RMCS10 

PC.ENBSCH 

10S 

50$ 



;SECTOR=0=TRACK 
;CrLINDER=0 
;16 BIT FORMAT 
.STARTING BUFFER ADDRESS 
.'WORD COUNT 
; WRITE DATA COMMAND 

; EXECUTE DATA COMMAND TO POINT WHERE 
; SEARCH IS ENABLED USING SUBROUTINE. 
;BRANCH TO 10$ IF NO ERROR 

;SLOC REST PF TEST 



.START THE CLOCK AND WAIT FOR 100 MS 
10$: 

MOV #100.. WATCH ;SET WATCHDOG TIMER VALUE 
JSR PCaCLOCK ; START THE CLOCK 

20$: TST WATCH 
BNE 20$ 

JSR PC.iSTOPCL ;ST0P THE CLOCK 

.VERIFY THAT OP I IS NOT SET (SEARCH TIMEOUT IS DISABLED) 



MOV RMER1 (RO) »$BDDAT 

MOV R0,$8DADR 

ADD #RMER1.$BDADR 

BIC #*COPI,$BDDAT 

BEQ 30$ 

CLR $GDDAT 

EMT 20 

BR 50$ 



.•STORE RMER1 AT JBDDA 1 



;SET UP FOR ERROR MSG 
.•BRANCH IF NO ERROR 



.•DISABLED 
.'SKIP 



; ENABLE SEARCH TIMEOUT. THEN WAIT 100 MS 
30$: 

MOV #DMD.'MUR!DBEN!M0C.RMMR1(R0) 



;LOAD RMMR1 



CZRMQBO RM05/3/2 DSKLS T ST 2 
TV SEARCH TIMEOUT TEST 



588 

589 
590 
591 
592 
593 
594 
595 
596 
597 
598 
599 
600 
601 



011120 
011126 
011132 
011136 
011140 



011144 
011152 
011160 
011162 
011170 
011172 



012737 
004777 
005737 
001375 
004777 



016037 
042737 
001004 
012737 
104021 



000144 
1 70404 
001534 

1 70374 



000014 
157777 



N 5 
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001534 



001142 
001142 



020000 001140 



40$: 



;OPI 



50$: 



MOV 
JSR 
TST 
BNE 

JSR 

SHOULD 
MOV 
BIC 
BNE 
MOV 
EMT 



NOW 



SEO 0065 



#100. .WATCH 
PCaCLOCK 
WATCH 
40$ 

PC.3ST0PCL 



;SET WATCHDOG TIMER VALUE 
.START THE CLOCK 



;STOP THE CLOCK 



BE SET (SEARCH TIMEOUT 
RMER1 (RO) ,$8DDAT 
#*C0PI.$BDDAT 
50$ 

*OPI.$GDDAT 

21 



IS ENABLED) 
; STORE RMER1 



AT $BDDAT 



•TEST 12 



SET DTE TEST 



011172 
C11172 
011174 
011176 
011202 
011206 
011212 



TST12: 



000004 
000240 
012706 
013700 
013701 
012737 



001100 
001276 
001466 
000012 



001226 



602 








603 011220 


010037 


001136 


001136 


604 011224 


062737 


000014 


605 011232 


005037 


001140 




606 








607 








608 011236 


004737 


022404 




609 






001142 


610 011242 


016037 


000014 


611 011250 


042737 


167777 


001142 


612 011256 


001402 






613 011260 


104031 






614 011262 


000517 






615 








616 








617 011264 








618 011264 


012760 


000001 


000024 


619 011272 


012760 


000005 


000024 


620 011300 


016037 


000014 


001142 


621 011306 


042737 


167777 


001142 


622 011314 


001402 






623 011316 

624 011320 


104000 






000500 






625 








626 








627 011322 








628 011322 


012737 


000000 


001420 


629 011330 


012737 


000005 


001446 


630 011336 


012737 


010000 


001444 


631 011344 


012737 


054636 


001416 


632 011352 


012737 


177777 


0014H 


633 011360 


012737 


000061 


001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 

MOV 
ADD 
CLR 



#STACK,SP 
$BASE.R0 
TSTQUE.R1 
#12,$TESTN 

R0,$8DADR 

#RMER1.$BDADR 

$GDDAT 



; SCOPE CALL 

;LOAI> THE STACK POINTER 

;R0 = UNIBUS ADDRESS 

;R1 = POINTER TO DEVICE 

;;SET TEST NUMBER IN APT MAIL BOX 

.-SETUP ERROR MSG 



.•INITILAIZE AND VERIFY THAT DRIVE TIMING ERROR IS RESET 
JSR PC.CNTCLR ;G0 CLEAR CONTROLLER 



MOV RMER1 (RO) ,$BDDAT 

BIC #*CDTE.$BDDAT 

BEO 10$ 

EMT 31 

BR 50$ 



.•STORE RMER1 AT $BDDAT 
.•BRANCH IF DTE=0 
.-SKIP REST OF TEST 



.SET MAINTENANCE INDEX PULSE AND VERIFY DTE REMAINS RESET 
10$: 

*DMD,RMMRKR0) ;L0AD RMMR1 
WMD.'Ml.RMMRKRO) ;LOAD RMMR1 

RMER1 (RO) .$8DDAT ;STORE RMER1 AT $8DDAT 

#*CDTE ,$BDDAT 
20$ 



MOV 
MOV 
MOV 
BIC 
BEO 
EMT 
BR 



50$ 



; COMPARE SHOULD BE RESET 



.•EXECUTE DUMMY DATA COMMAND TO ENABLE SEARCH 
20$: 

MOV #0,RMDAO 

MOV #5.RMDC0 

MOV 0FMT16.RMOFO 

MOV 08UFFER.RMBAO 

*10V #-1,RMWC0 

MOV 0WD.GO.RMCS1O 



635 011366 004737 0224 32 



01 1 372 
0M374 



000402 
104000 





000451 














6^8 








63<3 








640 011400 








641 OiKOO 

\J T 1 ' ' ~^rV 


012760 


05H41 


000024 


6*.? 011406 


012760 


051401 


000024 


















645 








646 








647 








648 011414 


016037 


00001 4 


001142 


649 011422 


042737 


167 e ' 


001142 


650 C1 1430 


001402 






651 011432 


104023 






65? 011434 


001432 

VV 1 ~ JC 






£53 








654 








655 011436 








656 011436 


01 2760 


051403 


000024 


657 011444 


012760 


051443 


000024 


658 011452 


012760 


051403 


000024 


659 








660 








661 011460 


012760 

V ■ C » wV 


051441 


000024 


66*> 011466 


012760 


051401 


000024 


663 011474 


016037 


000014 


001142 


664 011502 


042737 


1 67777 


001142 


665 011510 


001004 

WW ■ V^r~ 






666 011512 


012737 


010000 


001 H2 


667 011520 


104024 






668 








669 011522 








670 








671 









011522 






011522 


000004 




011524 


000240 




011526 


012706 


001100 


011532 


013700 


001276 


011536 


013701 


001466 


011542 


012737 


000013 


672 






673 011550 


012702 


012100 


674 






675 






676 011554 






677 011554 


004737 


022404 



JSR 

BR 

EMT 

BR 



PC.ENBSCH 

30$ 

50$ 



EXECUTE DATA COMMAND TO POINT WHE PE 
SEARCH IS ENABLED USING SUBROUTINE. 
BRANCH TO 30* If NO ERROR 



;WITH SEARCH ENABLED, SET AND RESET SECTOR PULSE TO SET ENABLE 

•SEARCH FLOP. 

30$: 

MOV : #DMD ! MUR ! DBE N .' M0C ! MSE N ! MS , RMMR 1 ( R0 ) ;L0AD RMMR1 
MOV #DMD!MUR:DBEN!M0C!MSEN.RMMR1(R0) ;L0AD RMMR1 

SET SECTOR PULSE AND VERIFY DTE DOES NOT SET 
PUTMR1 #DMD .' MUR ! DBEN ! M0C ! MSEN ! MS 
PUTMR1 #DMD ! MUR ! D8EN ! M0C ! MSEN 



MOV RMER1 (R0) .$8DDAT 

BIC #*CDTE ,$BDDAT 

BEQ 40$ 

EMT 23 

BEQ 50$ 



; STORE RMER1 AT $BDDAT 



.COMPARE SHOULD BE RESET 



.•FORCE SECTOR COMPARE 
40$: 

MOV 
MOV 
MOV 



*DMD ! MUR ! D8EN '. M0C ! MSEN ! MS C . RMMR 1 ( R0 ) 
#DMD .'MUR ! D8ENJM0C !MSEN!MSC .'MS .RMMR1 (R0) 
#DMD ! MUR! DBEN !M0C .'MSEN.'MSC.RMMRI (R0) 



:SET SECTOR PULSE AND VERIFY DTE SETS 

MOV #DMD ! MUR ! DBEN ! M0C! MSEN .'MS. RMMR 1(R0) 

MOV #DMD ! MUR ! DBEN !M0C. 'MSEN. RMMR KRO) 

MOV RMER1 (RO) ,$8DDAT .STORE RMER1 

BIC #*CDTE ,$BDDAT 

BNE 50$ 

MOV #DTE.$BDDAT 

EMT 24 

.•SECTOR COMPARE SET 



AT 



.LOAD RMMR- 
; i OAD RMMR1 
.-LOAD RMMR1 



;L0AD RMMR1 
.LOAD RMMR1 
$8DDAT 



50$: 



.••TEST 13 



FORMAT CHANGE TEST 



TST13: 



001226 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 

MOV 



#STACK,SP 
$8ASE.R0 
TST0UE.R1 
#13.$TESTN 

#50$, R2 



; SCOPE CALL 

.-LOAD ^HE STACK POINTER 

;R0 = UNIBUS ADDRESS 

;R1 = POINTER TO DEVICE 

;;SET TEST NUMBER IN APT MAIL BOX 

;R2= TABLE POINTER 



; INI T RAIZE AND SET THE FORMAT BIT, USE INDEX PULSE TO CLEAR FORMAT CHANGE 
10$: 

JSR PCCNTCLR ;G0 CLEAR CONTROLLER 



CZRMQBO RM05/3/2 DSKLS TST 2 
T 13 FORMAT CHANGE T£ST 



678 
679 
680 
681 
682 
683 
68A 
685 
686 
687 
688 
639 
690 



011560 
011564 
011572 



011600 
011606 
011614 
011622 
011630 
011636 



011260 
012760 
012760 



0^737 
012737 
016237 
012737 
012737 
012737 



00003? 
G00001 
000005 



000000 
000005 
000002 
054636 
U7777 
000061 



011644 004737 022432 
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000024 
000024 



001420 
001446 
001444 
001416 
001414 
001412 





m 1 aso 


ooo/ao? 

UUUHUc 








n 1 1 as? 


1 C\L OOO 
I UHUUU 






AQ1 

O^ 1 


m 1 asl 


000s 1 A 

UUU J I *• 






AQP 










AO 7 










o« 












U 1 I O JO 








AQA 
OTPO 


11 1 ASA 
v/ I 1 O JO 


01 ?7AO 
U I c f OU 


osiaot 

U J 1 HU j 


0000?£ 

UUUUc H 


AQ7 


01 1 AAA 
v I 1 OOH 


01 ?7AO 
U I c 1 0 v 


osiaa7 

U J I HH J 


0000?/. 

UUUUc 1 * 


AQH 


01 1 A7? 
Ul 1 Of c 


01 ?7AO 

Ult' OU 


0S1A07 
U J 1 HU J 


0000?£ 

UUUUcH 


AQQ 

OT7 


01 1 7on 


01 ?7A0 
u I c f OU 


OS1A01 

U J I HU I 


0000? L 
UUUUcH 












f u I 










i\lc 


O1 1 70A 
U I I < uo 


O I AOT7 
U I OUjf 


00001 A 

UUUU 1 H 


001 1 A? 

UU I 1 He 


7T17 
f UJ 


01171A 

Ul If 1 H 


OA?777 

UHC f J f 


1A7777 

lor 1 1 r 


001 1 A? 

UU 1 1 H c 




01 1 7?? 
U I 1 1 cc 


001A1 A 
UU 1 h 1 0 






70s 


01 1 7?L 

Wl If cH 


010077 

U 1 UUJf 


001 1 7A 
UU I 1 JO 




7TV, 
/ uo 


0117 V. 
ui i' ju 


OA?777 

UOc f Ji 


00001 A 

UUUU 1 H 


001 1 7A 

UU 1 1 JO 


707 
f\jf 


on 7 V. 

Ul 1 1 DO 


OOS077 


OOI 1 AO 
UU 1 ' HU 




70R 

f UO 


01 1 7£? 

Ul 1 r He 


01 1 ?77 

U 1 1 CJi 


OOI 1 7L 
UU II' 1 * 




7(TQ 


01 1 7AA 

UN ( HO 


01A?77 

V 1 ULJI 


00000? 


001 1 7A 

UU 1 1 f 0 


710 
f 1 u 


01 1 7SA 
Ul 1 1 jh 


10£0?S 
I U*tUc J 






711 


011756 


000453 






712 










713 










714 


011760 








715 


011760 


012760 


051405 


000024 


716 










717 










718 


011766 


012760 


051403 


000024 


719 


01 1 774 


012760 


051443 


000024 


720 


012002 


012760 


051403 


000024 


72 1 










722 










723 


012010 


012760 


051441 


000024 


724 


012016 


012760 


051401 


000024 


725 


012024 


016037 


000014 


001142 


726 


012032 


042737 


167777 


001142 


727 


012040 


001012 






728 


012042 


010037 


001 1 36 




?29 


012046 


062737 


000014 


001136 


7 30 


012054 


012737 


010000 


001140 


-31 


C'206? 


T0^027 







MOV (R2),RM0F (RO) ;L0AD FORMAT MODE IN RM0F 

MOV #DMD.RMMR1 (RO) ; L 0AD RMMR1 

MOV #DMD!MI.RMMR1(R0) ;L0AD RMMR1 

.•SETUP AND EXECUTE DUMMY DATA COMMAND USING OPPOSITE FORMAT 

MOV #0,RMDA0 

MOV #5.RMDC0 

MOV 2<R2).RMOFO 

MOV #8UFFER.RMBA0 

MOV #-1 .RMWC0 

MOV #WD!G0.RMCS10 



JSR 

BR 

EMT 

BR 



PC.ENBSCH 

20S 

60$ 



.•EXECUTE DATA COMMAND TO POINT WHERE 
.•SEARCH IS ENAfelED USING SUBROUTINE. 
.•BRANCH TO 20$ IF NO ERROR 



.•FORMAT CHANGE FLOP SHOULD BE SET - VERJF Y BY TRYING TO FORCE A 
.•DRIVE TJMJNG ERROR WHICH SHOULD NOT SET. 



20$: 



MOV #DMD ! MUR ! DBEN ! M0C ! MSEN ! MS C , RMMR 1 ( R0 ) 

MOV #DMD ! MUR ! D3EN ! M0C ! MSEN i MS C .'MS, RMMR 1 ( R0 ) 

MOV #DMD! MUR! DBEN! MOC !MSEN!MSC,RMMR1 (R0) 

MOV #DMD! MUR! DBEN! MOC !M5EN,RMMR1 (R0) 



LOAD RMMR1 
LOAD RMMR1 
LOAD RMMR1 
LOAD RMMR1 



.•VERIFY THAT DRIVE TIMING ERROR DJDNT SET 



MOV RMER1(R0),$8DDAT 

BJC #*CDTE ,$BDDAT 

BEQ 30$ 

MOV R0,$8DADR 

ADD #RMER1 , $8DADR 

CLR $GDDAT 

MOV (R2),$TMP0 

MOV 2(R2),$TMP1 

EMT 25 

BR 60$ 



.-STORE RMER1 AT S8DDAT 



.'SETUP ERROR MESSAGE 



;A FORMAT CHANGE 



.CLEAR THE FORMAT CHANGE FLOP W/INDEX PULSE 
30$: 

MOV *DMD ! MUR ! DBEN ! MOC ! MSEN ! M J .RMMRl (RO) ;L0AD RMMRl 

.ENABLE SEARCH AND FORCE SECTOR COMPARE 

MOV #DMD ! MUR ! DB£N . 1 MOC! MSEN.' MS C, RMMRl (RO) . LOAD RMMRl 

MOV #DMD! MUR! DBEN! MOC !MSEN!MSC .'MS, RMMRl (RO) ;L0AD RMMRl 

MOV #DMD!MUR!D8EN!M0C!MSEN!MSC,RMMR1 (RO) ;L0AD RMMR1 



SET DTE W/ANOTHER SECTOR PULSE - VERIFY DTE IS SET 



MOV 
MOV 
MOV 
BIC 
BNE 
MOV 
ADD 
MOV 
EMT 



#DMD ! MUR ! DBEN .' MOC ! MSEN i MS . RMMRl (RO ) 
#DMD ! MUR ! DBEN .' MOC ! MSEN . RMMR1 ( RO ) 
RMER1 (RO) ,$BDDAT .-STORE RMER1 

# A CDTE,$BDDAT 



AT 



.-LOAD RMMR1 
;L0AD RMMR1 
$8DDAT 



40$ 
R0.$8DADR 
0RMER1 ,$BDADR 
*DTE,$GDDAT 

27 



: SETUP ERROR MESSAGE 



r ZKMQBO IW05/V2 DSKLS T ST 2 
T1 3 f ORMAT CHANGE TEST 



D 6 
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>EQ 0068 



7X0 
' JC 


A1 3 AAA 


AAA/. 1 A 




BO 






7XX 

'JJ 














71/ 






■ nA 


TC C T U/1R 


TA 1A C ADM AT 
I U lor UHflM I 


ru&Ktnc riiiDfiur ccrAiuft cvcri it rr*i 
IrlAVMut DUnJiMO StlUIw CAClU'lUN 


7?C 

' J J 


(11 3 AAA 












77A 


A1 5 AAA 
'J I c UOO 

A1 DA75 

U ■ cUf £ 


A557A3 A151AA 
Ucc ' Uc U I c I UU 






*COt 07 




777 

' J' 


AA1 AAC 
UU I UU5 




BMP 
Onlt 


ADC 


-BDAfuru If rtAiuc TCCT 


7XM 


A1 5D7A 
U I cuf't 


AAC733 
UU J ' CC 




T C T 


( oo \ ♦ 


-MAV/C OA (KIT CO 




U I CXJrO 


AAA/, 9 A 
UUUOc D 




BO 

On 


1 u> 


•DC OF AT TCCT 
















74. 1 


012100 


010000 


50$: 


.WORD 


FM716 


; 16-1 8 FORMAT CHANGE 


742 


012102 


000000 




.WORD 


0 


; 18-16 FORMAT CHANGE 


7s 3 


012104 


010000 




.WORD 


FMT16 


7 44 


012106 




60$: 






;END OF TEST 


745 














746 






» • 









.-•TEST 14 



PROM STROBE TEST 



012106 
C12106 
012110 
012112 
012116 
012122 
012126 

747 

748 012134 

749 012140 

750 012144 
751 

752 

753 012152 

754 012160 

755 012164 
012164 

756 012172 

757 012200 

758 012206 

759 012214 

760 012216 

761 012220 

762 012222 

763 012226 

764 012230 

765 012232 

766 012236 
012236 

767 012244 

768 012252 

769 012260 

770 012266 

771 012270 

772 012272 

773 012274 

774 012302 

775 012304 
776 



000004 
000240 
012706 
013700 
01 3701 
C12737 

004737 
010037 
062737 



012760 
012702 

012760 
012760 
016037 
042737 
001406 
005302 
001 361 
005037 
104000 
000501 
012702 

012760 
012760 
016037 
042737 
001007 
005302 
001361 
012737 
104030 
000453 



TST14: 



001100 
001276 
001466 
000014 

022404 
001 1 36 
000024 



000001 
000021 

004001 
000001 
000024 
177737 



001140 



000021 

004001 
000001 
000024 
177737 



001226 

001136 
000024 



000024 
000024 
001142 
001142 



SCOPE 




; SCOPE CALL 


NOP 




MOV 


#STACK,SP 


;L0AD THE STACK POINTER 


MOV 


S6ASE.R0 


;R0 = UNIBUS ADDRESS 


MOV 


TSTQUE.R1 


;R1 = POINTER TO DEVICE 


MOV 


#14.$TESTN 


;;SET TEST NUMBER IN APT MAIL BOX 


JSR 


PC.CNTCLR 


;G0 CLEAR CONTROLLER 


MOV 


R0,$8DADR 


; SETUP ERROR MESSAGE 


ADD 


#RMMR1 .S8DADR 





;SET 
5$: 



DIAGNOSTIC MODE AND TRY TO RESET PROM STR08E 
MOV /TDMD.RMMRKRO) ;L0AD RMMR1 
MOV #17.,R2 ;R2=MAXIMUM # CLOCK PULSES 



; STORE RMMR1 AT SBDDAT 



000024 
000024 
001 142 
001142 



6$: 
10$: 



000040 001140 



MOV #DMD!MCLK,RMMR1(R0> ;L0AD RMMR1 

MOV #DMD.RMMR1(R0) ;L0AD RMMR1 

MOV RMMRl (RO) ,$BDDAT 

BIC #*CWC.$BDDAT 

BEO 6$ 

DEC R2 

BNB 5$ 

CLR $GDDAT 
EMT 

BR 60$ 

MOV #17.,R2 

MOV *DMD!l"ICLK.RMMRKRO> ; LOAD RMMRl 

MOV #DMD, RMMRl (RO) ;L0AD RMMRl 

MOV RMMR1 (RO) ,$8DDAT .-STORE RMMRl AT $BDDA T 

BIC # A CWC.$BDDAT 

BNE 20$ .-EXIT LOOP WHEN PROM STROBE ON 

DEC R2 

BNE 1 0$ 

MOV #WC.$GDDAT 

EMT 30 

BR 60$ 



'-Z&MQRO RM05/3/2 DSKLS 1ST 
T K PROM STROBE TEST 



E 6 

MACRO V04.00 4-APR-81 01:29:56 PAGE 13-16 



bEO 0069 



777 








7 78 012306 








779 012306 


012702 


aaaaa 7 

000003 




—* n s\ /s * ^74 i 

780 012312 








012312 


012760 


/\ A / r\Ai 

004001 


000024 
0000 <:4 

AA1 1/1 

001142 


781 012320 


rt * 1 7^ /\ 

012760 


000001 


7 82 012326 


016037 


/*v /"N A A 1 / 

000024 


783 012334 


/\ / 1777 

042737 


1 7777 7 

1 77(57 


AA4 1/1 

0011 42 


784 012342 


001005 






785 








786 012344 


Ai 1777 

012O7 


AAAA/ A 

000040 


AA1 1 / A 

QOt 1*»0 


737 r\ 1 17C 1 

737 012352 


1 A/ ATI 

104032 






-»0 O A1 17C / 

788 012354 


AAA/ 17 

000427 






7QI1 

789 012356 


005302 






790 012360 


001 354 






7f"\ 4 

TV! 








792 








-^17 /\ 4 17^1 

795 012362 


A1 17A^ 


AAAA1 A 

000010 




to/ A 1 I?//. 

TvA 012.566 








C12366 


A1 ^7/ A 


aa y 1 


AAAA^/ 
OOOO^H 


f"r5 01c5f4 


V\c7bU 


AAAAA 1 
000001 


AAAAO/ 

0000<:*» 


~-»r\j r\ 4 1/ /\i 

796 012402 


r\ 4 > A77 

016037 


000024 


AA1 4/1 


7Q7 A1 1/ 1 A 


Ay 1777 

04 *v 5f 


1 77777 


AA1 1 / *5 


rVo 01<:4I6 


AA1 / Ay 

UO I4U4 






TOO A1 "5y OA 


Anc AT7 


nm 1 / a 




BAA A15APA 


1 Ay.A77 






801 012426 


000402 






802 012430 


005302 






803 012432 


001355 






804 012434 








805 








806 









;VERIFY 
20$: 

25$: 



30$: 

.•VERIFY 
40$: 



50$: 
60$: 



PROM STROBE IS ON FOR 3 BIT CLOCKS 

MOV *3..R2 

MOV #DMD .'MCLK.RMMR1 (R0> ;L0AD RMMR1 

MOV #DMD,RMMR1 (R0) ; L 0AD RMMR1 

MOV RMMR1 (R0) ,$8DDAT ;STCRE RMMR1 AT $8DDAT 

BIC **CWC,$BDDAT 

BNE 30$ ; BRANCH IF PROM ST0R8E DID NOT 

; DROP EARLY 

MOV #WC,$GDDAT 

EMT 32 

BR 60$ 

DEC R2 

BNE 25$ 

PROM STROBE IS OFF FOR 8 BIT CLOCKS 

MOV »8. .R2 

MOV *DMD!MCLK,RMMR1(R0) ;L0AD RMMR1 

MOV *DMD,RMMR1(R0) ;L0AD RMMR1 

MOV RMMR1 <R0),$8DDAT ."STORE RMMR1 AT $8DDAT 

BIC **CWC,$BDDAT 

BEQ 50$ .-BRANCH If PROM STROBE 

CLR $GDDAT ;DID NOT SET EARLY 

EMT 33 

BR 60$ 

DEC R2 

BNE 40$ 



.-•TEST 15 



SYNC WORD COUNT INHIBIT TEST 



807 
808 
809 
810 
811 
812 
813 
814 
815 
816 



012434 
012434 
012436 
012440 
012444 
012450 
C12454 



012462 
012470 
012476 
012504 
012512 
012520 



012532 
012534 

817 012536 

818 012540 



000004 
000240 
012706 
013700 
013701 
012737 



012737 
012737 
012737 
012737 
012757 
012737 



TST15: 



001100 
001276 
001466 
000015 



000005 
000000 
010000 
054636 
177777 
000061 



012526 004737 022432 



000402 
104000 
000562 



001226 



001446 
001420 
001444 
001416 
001414 
001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



#STACK,SP 
$BASE,R0 
TST0UE.R1 
#15.$TESTN 



; SCOPE CALL 

LOAD THE STACK POINTER 

R0 = UNJBUS ADDRESS 

R1 = POINTER TO DEVICE 

;SET TEST NUMBER IN APT MAIL BOX 



; SETUP REGISTER OUTPUT BUFFER FOR SUBROUTINES 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 



10$: 



BR 
EMT 

BR 120$ 



#5,RMDC0 
#0,RMDA0 
#FMT16,RM0F0 
08UFFER.RMBAO 
AM.RMWCO 
#WD!G0,RMCS10 

PC.EN8SCH 

10$ 



CYLINDER=5 
SECT0R=0. TRACK=0 
16 BIT FORMAT 
STARTING BUFFER ADDRESS 
WORD COUNT 
WRITE DATA COMMAND 

EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE . 
BRANCH TO 10$ IF NO ERROR 

; SKIP IF FAILURE 



CZRMQBO RM05/3/2 DSKLS TST 2 MACRO 
T15 SYNC WORD COUNT INHIBIT TEST 
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E 1^-17 



gig mp^o 
















oi?S46 


1 o^ooo 






opo niP'i'iO 


UUU J J J 






ft?1 
Oc 1 
















8?3 








R?4 








ftps otps 1 ;? 

OC J UICJJl 




noonoo 




8?6 








827 








8?8 01?556 








H?Q 01?556 


01? 760 




0000?£ 


830 01?564 


01 ?760 


0^1401 


0000P4 


8^1 

OJ 1 






832 








833 oi?57? 


01600^ 


0000?4 




834, 01?S76 


03?70^ 

uJC ' V J 


000040 




«3S 01?60? 


001 765 

WW 1 r V J 






836 C1?604 


005?0? 






837 








838 








839 012606 


010337 


001 14? 




84.0 01?61? 


04?737 


175777 


001 14? 

V/W 1 IHC 


841 01?6?0 


00141 3 

WW it IJ 






84? 01 ?6?? 


005037 

WW J\J _J ' 


001 140 




843 01?6?6 


0100^7 

W 1 UWJ> 


001 1 ^6 

W 1 JO 




844 01?63? 


06?737 

vUC » J » 


0000?4 

vuvvct 


001 1 ^6 


845 012640 


010237 

W 1 vC J * 


001 1 74 

v V 1 1 » t 




846 01?644 

W"t*J V 1 Cw^" 


1040^4 






847 01?646 


0005 1 6 

WWW J 1 O 






R4H 








849 








850 01?650 








851 012650 


0??70? 

VCC vC 


00001? 

wwvv 1 C 




85? 0T?654 


001414 

WW It It 






853 








854 








855 01?656 








856 01?656 


vIC OW 


W J t 




8 C 7 01?664 


UlCi Uv 


vJ 1 Hw 1 


0000?^ 


858 








859 








860 01?67? 

UUV v./ 1 cu> C 


W 1 WWW J 


WV/WWCH 




861 01?676 


03P703 


WVWVH V 




862 012702 


001 365 

WW 1 JU > 






863 01P704 

J W ■ £ ' W"t 


0007?4 

WWW ' C H 






864 








865 








866 








867 012706 








868 012706 


012702 


000020 




869 








870 








871 012712 








872 012712 


0V760 


055401 


000024 


87? 0T2720 


01 2760 


051401 


000024 



SEO 0070 



JSR 
BR 
EMT 
BR 



PC-SCTCMP 
20$ 

120$ 



.'FORCE SECTOR COMPARE USING SUBROUTINE 
; BRANCH TO 20$ IF NO ERROR 



;CAN NOW STEP DATA TIMING SEQUENCER WITH SECTOR COMPARE SET 

;STEP THE SEQUENCER TO LOCATION 10(10) WHILE CHECKING "PLFS** 
20$: MOV #0,R2 ;R2=SEQUENCER ADDRESS 



:PULSE MAINTENANCE CLOCK UNTIL PROM STROBE SETS 
30$: 

MOV *DMD!MUR!DBEN!M0C!MSEN!MCLK,RMMR1(R0) 
MOV #DMD!MUR!DBEN!M0C !MSEN,RMMR1 (RO) 



;L0AD RMMR1 
;L0AD RMMR1 



.-SEE IF PROM STROBE IS SET 

MOV RMMR1(R0),R3 
BIT *WC,R3 
BEQ 30$ 
INC R2 



.STORE RMMR1 AT R3 



.-ISSUE NEXT BIT CLOCK 

; INCREMENT SEQUENCER ADDRESS 



.CHECK "LOOKING FOR SYNC" - SHOULD BE ZERO UNTIL LOCATION 11 



MOV R3.$8DDAT 

BIC #*CPLFS.$8DDAT 

BEQ 50$ 

CLP $GDDAT 

MOV R0,$8DADR 

ADD #RMMR1,$BDADR 

MOV R2.$TMP0 

EMT 34 

BR 120$ 



.•BRANCH IF PLFS IS ZERO 



; SKIP REST OF TEST 



.-EXIT LOOP IF SEQUENCER NOW AT LOCATION 10 
50$: 

CMP #10..R2 

BEQ 70$ 

; PULSE MAINTENANCE CLOCK UNTR PROM STROBE RESETS 
60$: 

MOV #DMD ! MUR ! D8EN .' M0C .'MSENIMCLK.RMMR1 (RO) 

MOV fDMD.'MURiDBEN.'MOC.'MSEN.RMMRl (RO) 



.-LOAD RMMR1 
;L0AD RJW1 



;SEE IF PROM STROBE IS RESET 
MOV RMMR1(R0).R3 
BIT #WC,R3 
BNE 60$ 
BR 30$ 



.•STORE RMMR1 AT R3 

;G0 STEP SEQUENCER TO NEXT L0C 



; THF NEXT PROM STROBE SHOULD SET 'PLFS" AT LOCATION 11(10) OF THE 

.-DATA TIMING SEQUENCER. 

70$: 

MOV #16.. R2 ;R2=NUMBER OF BIT CLOCKS 

.•ISSUE 16 BIT CLOCKS TO GET NEXT PROM STROBE 
80$: 

MOV 0DMD . MUR . DBEN.'MOC JMSEN.MCLK.RMMR1 (RO) ;L0AD RMMR1 
MOV #DMD.MUR.DBEN.MOC!MSEN.RMMR1(R0) ;L0AD RMMR1 



ZRMQBO 

874 
875 
876 
877 
8?8 
879 
880 
881 
882 
883 
884 
835 
886 
887 
888 
889 
890 

891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
90a 
905 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 



RM05/3/2 DSKIS 1ST 2 MACRO 
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G 

PAGE 



it 



18 



012726 
012730 



012732 
012740 
012746 
012750 
012756 
012762 
012770 
012772 



012774 
012774 
013000 
013000 
013006 
C13014 
013016 



005302 
001 370 



016037 
042737 
001012 
012737 
010037 
062737 
104035 
000444 



000024 001142 

175777 OOi H2 

002000 001 140 
001 1 36 

000024 001136 



DEC 
BNE 

.•VERIFY THAT 
MUV 
BIC 
BNE 
MOV 
MOV 
ADD 
EMT 
BR 



R2 
80$ 

"PUS" IS NOW SET 
RMMR1 (R0).$8DDAT 
# A CPLFS.$BDDAT 

90$ ; BRANCH IF PLFS JS SET 

#PLFS,$GDDAT 
R0.$8DADR 
#RMMR1 ,$BDADR 
35 

120$ ;SK]P REST OF TEST 



.-STORE RMMR1 AT $8DDAT 

IF PLFS JS SI 
.-SETUP ERROR MESSAGE 



012702 000003 



012760 
012760 
005302 
001370 



055401 000024 
051401 000024 



.-ISSUE 3 MORE BIT CLOCKS TO RESET PROM STROBE 
90$: 

MOV #3.R2 

95$: 

MOV *DMD!MUR!DBEN!M0C!MSEN!MCLK,RMMR1(R0> 

MOV #DMD . MUR . DBEN ! MOC 'MSEN.RMMR1 (RO) 

DEC R2 

BNE 95$ 



;LOAD RMMR1 
;LOAD RMMR1 



013020 012702 000040 



.-WITH "LOOKING FOR SYNC SET. FURTHER BIT CLOCKS SHOULD NOT SET 
;PROM STROBE 

MOV #32., R2 ;R2=NUMBER OF BIT CLOCKS 



013024 








1 00$: 




013024 


012760 


055401 


000024 




MOV 


013032 


012760 


051401 


000024 




MOV 


013040 


016003 


000024 






MOV 


013044 


042703 


177737 






BIC 


013050 


001413 








8E0 


013052 


005037 


001140 






CLR 


01 3056 


010337 


001K2 






MOV 


013062 


010037 


001136 






MOV 


013066 


062737 


000024 


001 1 36 




ADD 


013074 


104036 








EMT 


013076 


000402 








BR 


013100 


005302 






110$: 


DEC 


013102 


001350 








BNE 


013104 








120$: 





.•PULSE BIT CLOCK AND VERIFY PROM STROBE DOES NOT SET 

#DMD ! MUR ! DBEN ! MOC ! MSEN ! MC LK . RMMR 1 ( RO ) 
#DMD! MUR! DBEN! MOC !MSEN.RMMR1 (RC) 



RMMR1(R0).R3 
# A CWC.R3 
110$ 
$GDDAT 
R3,$8DDAT 
RO , SBDADR 
#RMMR1,$BDADR 
36 

120$ 

R2 

100$ 



.•STORE RMMR1 AT R3 



;LOAD RMMR1 
;LOAD RMMR1 



; BRANCH IF PROM STROBE IS 0 
.•SETUP ERROR MESSAGE 



.•CONTINUE FOR 32 BIT CLOCKS 
;END OF TEST 



.••TEST 16 



SYNC DETECTION TEST 



9i3 
919 



013104 
013104 
013106 
013110 
013114 
013120 
013124 



000004 
000240 
012706 
01 3700 
013701 
012737 



001100 
001276 
001466 
000016 



TST16: 



001226 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



.•SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$BASE.RO ;R0 = UN I BUS ADDRESS 

TST0UE.R1 ;R1 - POINTER TO DEVICE 

#16.$TESTN ; ; SET TEST NUMBER IN APT MAIL BOX 



;SE T UP REGISTER OUTPUT BUFFER FOR SUBROUTINES 



ZRWQ8C RM05/3/2 DSKLS 1ST 2 
'16 SYNC DETECTION TEST 
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SfO 007? 



920 
921 
922 
923 
924 
925 
926 
927 



928 
929 
930 



931 
932 
933 



934 
935 
036 
937 
938 
939 
940 
941 
942 
943 
94 <♦ 
945 
946 
947 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 



013132 
013140 
013146 
013154 
013162 
013170 



013202 
013204 
013206 
013210 
013210 
013214 
013216 
01 3220 
01 3222 
013222 
CI 3226 
013230 
01 3232 



013234 
013234 
013240 
013244 
013252 
01 3256 
013264 
013264 
013272 
013300 
013306 
013314 
013316 
013324 
013326 
013330 
013330 
013332 
013334 



013340 
013340 
013346 
013354 
013362 
013370 
013372 
01 3376 
01 3400 
013402 
013402 



012737 
012737 
012737 
012737 
012737 
012737 



000000 
000005 
010000 
054636 
177777 
000071 



001420 
001446 
001444 
001416 
001414 
001412 



013176 004737 022432 



000402 
104000 
000550 

004737 023304 
000402 
104000 
000543 

004737 023412 
000402 
104000 
000536 



10$: 



20$: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 

BR 

EMT 

BR 

JSR 
BR 
EMT 
BR 

JSR 
BR 
EMT 
BR < 



#0.RMDAO 
#5.RMDC0 
#FMT16.RM0F0 
*8UFf ER.RMBAO 
#-1 .RMWCO 
#RD.G0.RMCS10 

PC.EN8SCH 

10$ 

100$ 

PC.SCTCMP 
20$ 

100$ 

PC.SETLFS 
30$ 

X00$ . 



SECTOR 0. TRACK 0 
CYLINDER 5 
16 BIT MODE 
BUFFER ADDRESS 
eORD COUNT 
READ DATA COMMAND 

EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE. 
BRANCH TO 10$ IF NO ERROR 



.-FORCE SECTOR COMPARE USING SUBROUTINE 
; BRANCH TO 20$ IF NO ERROR 



;SET '100KJNG FOR SYNC" USING SUBROUTINE 
.■BRANCH TO 30$ IF NO ERROR 



012702 


000020 






MOV 


010037 


001136 






MOV 


062737 


000024 


001 i 3 6 




ADD 


005037 


Q01140 






CLR 


012760 


053401 


000024 


40$: 


MOV 


012760 


057401 


000024 




MOV 


012760 


053401 


000024 




MOV 


016037 


000024 


001142 




MOV 


042737 


1 77737 


001142 




BIC 


U01405 








BE a 


012737 


177777 


001 1 74 




MOV 


104037 








EMT 


000500 






50$: 


BR 


005302 








DEC 


001 354 








BNE 


012702 


000020 






MOV 



; CLOCK ALL ONES SYNC PATTERN AND VERIFY SYNC IS NOT DETECTED 

.-(USING PROM STORBE AS INDICATION) 

30$: 

#16.. R2 ; NUMBER OF ONE BITS 

R0,$8DADR ; SETUP ERROR MESSAGE 

#RMMR1 .S8DADR 
SGDDAT 

#MR1AAA!MRD,RMMRUR0) ;L0AD RMMR1 

#MR1AAA!MRD!MCLtr.RMMR1(R0> ;LOAD RMMR1 

#MR1AAA!MRD.RMMR1 (RO) ;LOAD RMMR1 
RMMR1 (RO) ,$BDDAT ; STORE RMMRT AT $BDDAT 

#*CUC,$8DDAT 
50$ 

#1 77777. STMPO 
37 
100$ 



R2 
40$ 

#16.. R2 



.•REPEAT FOR 16 BITS 
.•NUMBER OF ZERO BITS 



012760 


055401 


000024 


MOV 


012760 


051401 


000024 


MOV 


016037 


000024 


001142 


MOV 


042737 


177737 


001142 


BIC 


001404 






BED 


005037 


001174 




CLR 


104037 






EMT 


000453 




70$: 


BR 


005302 






DEC 



.'CLOCK ALL ZERO SYNC PATTERN AND VERIFY SYNC IS NOT DETECTED 
60$: 

#MR1AAA!MCl K.RMMR1 (RO) 
#MR1AAA,RMMR1 (RO) 
RMMR1 (RO) .$8DDAT 



# A CWC.$8DDAT 
70$ 
$TMP0 

37 

100$ 
R2 



.'LOAD RMMR1 
.-LOAD RMMR1 

; STORE RMMR1 AT $BDDAT 



;M4KE SURE SYNC NOT DETECTED 



.-SKIP IF FAILURE 
.•REPEAT FOR 16 BITS 



ZRMQBO RM05/3/2 DSKlS TST 2 
T 16 S*NC DETECTION TEST 
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07A A1 ly Ay 

Vfv U 1 3404 


AA1 7«"C 
00 1 3j3 






ATI A1 ■»/ A/ 

"'1 U l 54Uo 


ai j7a^ 


r AAA/ A 




c ?o ai ?/ 1 1 


ai ">7A7 
u I <: f U3 


AAAA71 
UUUU3 I 




Q77 

3 








Q7/ 








VO 








V/o U 1 54 lo 


A1 5777 


AC 1 /_A1 
Uj I *»U I 


aai z.7a 

UU 1 *• 30 


Q77 A1 7/ 0/ 


ftftfti; 1 

UUOc*« I 






Q70 ni 7/ 

V'o U154 t 'o 


AAiL AA7 






q?q ai 7/ 7A 


1 A7AA7 
1 U3UU3 






qua a 1 7/. 7 6 
VOU U 1 3*» 5<: 


AC0777 


aa jaaa 
UUcUUU 


aai /.7a 

UU I *»30 


oji 1 a 1 7/ / n 








U 1 3*»*»U 


A1 77A.fl 
U I 3f OU 


aai 7A 

UU I *# JO 


aaaapz. 


qc o A 1 7/. / A 


flC D777 
Ujc r 3' 


aaz.aaa 
uu*»uuu 


aai £ 7a 


QQ7 A1 7/ Q/. 

^03 UI3*»j*« 


ai 77A.A 

U I 3 > OU 


nm A7A 

UU I *• jO 


aaaap/. 

UUUUc*« 


VO** U I 3*«oc 


f>/-?777 
U*«c r 3' 


aa/-aaa 

UU««UUU 


AA1/7A 
UU 1 H JO 




m 77An 

Ul J' OU 


aa 1 l 7a 

UU I *» jo 


AAAA5/ 


QUA A1 7Z. 7 A 
7C30 U I j*» f O 


A1 AH77 
U I OwJ' 


aaaap/. 




70( U I J JU*» 




1 77717 


nm 1/.? 


Voo u I 3D I c 


UU I uuo 






OHQ ni7^1£ 


nns^o? 






990 013516 


001 337 






991 013520 


012737 


000040 


001 KO 


992 013326 


104040 






993 013530 
















995 









SE0 0073 



BNE 60S 
MOV M12..W2 
MOV #00003 1,R3 



;R2=NUM8ER Of BITS 

;R3=SVNC PATTERN FOR LEFT SHIFT 



; CL0C 
;DETE 
SOS: 



90$: 



K THE BINARY SYNC PATTERN (10011000) AND VERIFY THAT SYNC IS 
CTED 



100$: 



1 1VJ V 


/TMR1AAA RMMR1H 


■GFNFRATF VAl UF OF RMMR1 


n r 


• f 1 FAR THF TARR 


nun 


D7 


; SHIFT RIGHT 




90$ 


■BRANCH IF C BIT CLEAR 


Oi -J 


#MRD RMMR1D 


■SET MRD IF PATTER BIT SETS 


MOV 


RMMR10.RMMRKR0) 


;L0AD RMMR1 


BIS 


♦MCLK^MMRIO 


;SET THE MAINTENANCE DATA CLK 


MOV 


RMMR10.RMMR1 (R0) 


;L0AD RMMR1 


BIC 


#MCLK.RMMR10 


; RESET BIT CLOCK 


MOV 


RMMR10.RMMRKP0) 


;L0AD RMMfil 


MOV 


RMMRKR0: ,$8DDAT 


; STORE RMMR1 AT $8DDAT 


BIC 


#*CWC,$8DDAT 




BNE 


100$ 


;8RANCH IF PROM STROBE IS SET 


DEC 


R2 


; C0NTINME FOR 16 BIT CLOCKS 


BNE 


80$ 


MOV 


#WC,$GDDAT 




EMT 


40 





;END OF TEST 



.-•TEST 17 



ABORT SYNC DETECTION TEST 



996 
997 
998 
999 
1000 
1001 
1002 
1003 
1004 
1005 



100 

10C' 

1CC* 



1009 
1010 



013530 
013530 
013532 
013534 
013540 
013544 
013550 



013556 
013564 
013572 
013600 
013606 
0136K 



013626 
0 1 3630 
5632 
. '634 
C"634 
; .3640 
013642 
013644 
013646 



000004 
000240 
012706 
013700 
013701 
012737 



012737 
012737 
012737 
012737 
012737 
012737 



TST17: 



000402 
104000 
000447 

004737 
000402 
104000 
000442 



001100 
001276 
001466 
00001 7 



000000 
000005 
010000 
054636 
■\77777 
000071 



013622 004737 022432 



023304 



001226 



001420 
001446 
001444 
001416 
001414 
001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



.•SCOPE CALL 

#STACK,SP ;L0AD THE STACK POINTER 

$BASE,R0 ;R0 = UNI BUS ADDRESS 

TSTOUE.R1 ;R1 = POINTER TO DEVICE 

#17,STESTN ;;SET TEST NUMBER IN APT MAIL BOX 



.SETUP REGISTER OUTPUT BUFFER FOR SUBROUTINES 



10$: 



20$: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 

BR 

EMT 

BR 

JSR 
BR 
EMT 
BR 



*0.RMDAO 
#5.RMDC0 
JTFMT16.RM0F0 
♦BUFFER, RMBA0 
#-1 .RMWCO 
#RD!G0.RMCS10 

PC.ENBSCH 

10$ 

50$ 

PC.SCTCMP 
20$ 

50$ 



SECTOR 0. TRACK 0 
CYLINDER 5 
16 BIT FORMAT 
STARTING BUFFER ADDRESS 
WORD COUNT 
READ DATA COMMAND 

EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE 
BRANCH TO 10$ IF NO ERROR 



.•FORCE SECTOR COMPARE USING SUBROUTINE 
.-BRANCH TO 20$ IF NO ERROR 



CZRMQBO RM05/3/2 DSKLS TST 2 MACRO 
Tl 7 ABORT SYNC DETECTION TEST 



V04.00 4-APR-81 01:29:56 



J 

PAGE 



15-21 



i U I I U I 3o*»o 
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AAA/. A 3 
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1 A/ AAA 
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AAA/ 
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U i c f oU 
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I U£U 








1 Uc 1 U 1 JDDO 


U 1 1 f Uc 


UUUUcU 




in^l A1 7A73 








IUcj U'jO'c 


fll 37AO 
U 1 c f OU 


Uj jHH 1 


UUUUcH 




A1 37Afl 
U I c fOU 


Uj I Hi I 


UUUUcH 


i n-jc A1 77AX 


\J lOUjf 


UUUUcH 


nm 1c3 

UU I 1 He 


I UcO Ul J' I H 


n/.P7^7 

Vr*Cf jf 


1 777X7 


001 14? 


10.37 H.17735 
IUcV yJiJ'CC 


UU IU 1 J 






■ UcO 1) 1 J' £*• 


uuj juc 






IfOQ ni 775A 
lUtV Ul J'fD 


UU I JO 1 






IUjU Ul j' jU 


niP777 
uic' j' 


ooon^o 

UUUUHU 


001 140 


1071 013736 


010037 


001136 




1032 013742 


062737 


000024 


001136 


1033 013750 


104041 






1034 013752 








1035 








1036 








1037 









1038 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
1047 



013752 
013752 
013754 
013756 
013762 
013766 
013772 



CI 4000 
014006 
014014 
014022 
014030 
014036 



000004 
000240 
012706 
013700 
013701 
012737 



012737 
012757 
012737 
012737 
012737 
012737 



001100 
001276 
001466 
000020 



000000 
000005 
010000 
054636 
1 77776 
000063 



014044 004737 022432 



014050 
014052 

1048 014054 

1049 014060 

1050 014060 
014064 
014066 



000405 
104000 
000137 

004757 
000402 
104000 



014444 
025504 



001226 



001420 
001446 
001444 
001416 
001414 
001412 



SE0 0074 



JS9 
BR 
EMT 
BR 



PC.SETLFS 
50$ 

50$ 



;SET ' "LOOKING FOR SYNC" USING SUBROUTINE 
; BRANCH TO 50$ IF NO ERROR 



LOOKING FOR SYNC INHIBITS WORD CL0CK.H0WEVER, 'DRIVE TIMING ERROR' 

SHOULD RESET "LFS WORD COUNT INHIBIT' FLOP 
.FORCE DRIVE TIMING ERROR 
50$: 

MOV #W<1AAA!MS,RMMR1(R0> ;L0AD RMMR1 
.-PULSE BIT CLOCK AND VERIFY PROM STROBE SETS 



40$: 



50$: 



MOV 

MOV 
MOV 
MOV 
BIC 
BNE 
DEC 
BNE 
MOV 
MOV 
ADD 
EMT 



#16.. R2 



;R2, NUMBER OF BIT CLOCKS 



#MR1AAA!MS!MCLK,RMMR1(R0) ;L0AD RMMR1 

*MR1AAA!MS.RMMRKR0) .'LOAD RMMR1 

RMMR1 (R0) .$8DDAT ; STORE RMMR1 AT $BDDA T 

# A CWC.$BDDAT 

50$ 

R2 

40$ 

#WC.$GDDAT 

R0.S8DADR 

#RMMR1,$8DADR 

41 



;»TEST 20 



SVNC GENERATION TEST 



TST20: 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



; SCOPE CALL 

#STACK.SP ;L0AD THE STACK POINTER 

$SASE,R0 ;R0 = UNI8US ADDRESS 

TSTQUE.R1 ;R1 ~ POINTER TO DEVICE 

#20.$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 



.SETUP REGISTER OUTPUT BUFFER FOR SUBROUTINES 

MOV #0,RMDAO .-SECTOR 0. TRACK 0 

MOV #5.RMDC0 ;CYL 5 

MOV #FMT16,RM0F0 ;16 BIT MODE 

MOV #8UFFER,RMBA0 .-BUFFER ADDRESS 

MOV #-2.RMWC0 ;W0RD COUNT 

MOV *WH!G0.RMCS10 .-WHITE HEAD AND DATA COM 



10$: 



JSR 

BR 

EMT 

JMP 

JSR 

BR 

EMT 



PCENBSCH 

10$ 

160$ 

PC.SCTCMP 
20i 



EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE. 
BRANCH TO 10$ IF NO ERROR 



.•FORCE SECTOR COMPARE USING SUBROUTINE 
; BRANCH TO 20$ IF NO ERROR 
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1 AC 1 ai / o7n 
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1 ACC 
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I UOC U I *• I jc 
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U I OUjf 
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I \Jf c U i H 1 


n*?7*7 
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UUUUU 1 
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in7z. ni/n^A 

I U' H UIHI JH 


UvJJvC 
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UU 1 -JO ' 




m7A miiArt 
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U I UU J ' 


UU 1 1 JO 


I U' ' U 1 *» 1 OS 


UOC' J' 


uuuu*»u 


1A7Q H1Z.17P 
lUfO U 1 *» I r c 


U I c ' -J' 


nnnnm 


i a to niz.?nfi 


i u** uhc 




I UOU UI*»cUc 


UUvjcv 




1 Uo 1 UI*»cU*t 






1 UOc 






i uo j umcut 






i not m l ic\l 


U I c ' ou 


U J JHU 1 


I UO J U 1 *»c 1 c 


U ' C ' ou 


U J 1 "U I 


I UOO wImccU 


A1X.AA7 
U 1 OUU J 


nnnn?^ 


i uo' u i *»cci 


Ujc » U J 


nnnn/.n 


inftfl ni£?*.n 

1 UOO U 1 He j'J 


AA1 7CC 
UU 1 ' o J 




1 uo^ 






1 AQA 
I UrU 






IUtI UImcjc 


AACTAO 
UU J JUC 




1 UVC UIHCJ"! 


UU 1 *♦ 1 H 




1 V7J 






1 AQA 






inos nic;?^A 

I V7J UIHCJO 






I y7D UI*tcJO 


ufC ou 


uJJiw 1 


I \j7f y met 1 * 


vlC< ou 


n c i ifli 

U J Hv 1 


IUTO WlHCJC 


U 1 DwUJ 
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UJc ' U J 


nnnni,o 


I l UU U l*»cOc 


nm 7?s 

UU 1 ' c J 




1101 014264 

1 IV 1 w 1 ~ C w» 


000764 




1102 






1103 






nw 






1105 






1106 014266 






1107 0K266 


012702 


000020 



SE0 0075 



001 142 
001H2 



001136 



001 142 
001142 



001 1 36 
001140 



BR 



160$ 



WRITE PROM OF DATA TIMING SEQUENCER SHOULD NOW BE ENABLED 
FIRST, VERIFY THAT WRITE GATE IS ON, INDICATING THAT 
SECTOR COMPARE SET 
20$: 

RMMR2CR0) ,$BDDAT 
#*C8800.$BDDAT 
30$ 

$GDDAT 
R0.$BDADR 
#RMMR2.$BDADR 
42 
160$ 



MOV 
BIC 
BNE 
CLR 
MOV 
ADD 
CMT 
BR 



STORE RMMR2 AT $8DDAT 
BUS BIT 0 IS WRITE GATt 



;F0RMAT-CS FAILURE 



;STEP THE DATA TIMING SEQUENCER TO LOCATION 16 AND VERIFY WRITE 
•GATE STAYS ON 
30$: 

#14., R2 



40$: 



50$: 
60$: 



MOV 

MOV 
BIT 
BNE 
DEC 
BNE 
MOV 
ADD 
MOV 
EMT 
BR 



MOV 
MOV 
MOV 
BIT 
BEQ 



RMMR2CR0) ,$8DDAT 

#8B00,$8DDAT 

50$ 

R2 

40$ 

R0,$8DADR 

#RMMft2,$8DADR 

#8S00.$GDDAT 

42 

160$ 



;MAXMUM NUMBER OF CLOCK 
.STORE RMMR2 AT $8DDAT 
•BRANCH IF WRITE GATE ON 



.•FORMAT - CS FAILURE 



#MR1AM!MCLK.RMMR1(R0> ;L0AD RMMR1 
#MRlAAA t RMMR1 (R0) ;L0AD RMMR1 

RMMR1 (R6> ,R3 .'STORE RMMR1 AT R3 
#WC.R3 
60$ 



;PR0M STROBE CAME 0N-DECREMENT PROM STROBE COUNT 

DEC R2 

BEQ 80$ 

;WAIT FOR PROM STROBE TO GO OFF. THEN REPEAT LOOP 
70$: 

MOV #MR1AAA!MCLK.RMMR1<R0> ;L0AD RMMR1 

MOV #MR1AAA.RMMR1 (RO) ."LOAD RMMR1 

MOV RMMR1(R0).R3 ; STORE RMMR1 AT R3 

BIT #WC.R3 

BEQ 40$ 

BR 70$ 

VERIFY HEADER SYNC GENERATION 

WRITE DATA BIT IS INVERTED AT MAINTENANCE REGISTER 
FIRST, COUNT NUMBER OF ZERO BITS UNTIL FIRST ONE BIT 
80$: 

MOV #16., R2 .-MAX TIMES THRU LOOP 
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108 


014272 


005003 




109 


0H274 








014274 


016004 


000024 


110 


014300 


032704 


000010 


111 


014304 


001414 




112 


014306 


005203 




113 


014310 


005 3C2 




IK 


014312 


001002 




115 


014314 


104043 




116 


014316 


000452 




117 


014320 






118 


014320 


01 2760 


055401 


119 


014326 


012760 


051401 


120 


014334 


000757 




121 








122 








123 


014336 






124 


014336 


020327 


000010 


125 


014342 


103002 




126 


C14344 


104043 




127 


014346 


000436 




128 








129 








130 


014350 






1 31 


014350 


012702 


000010 


132 


014354 


005003 




133 


014356 






134 


014356 


016004 


000024 


135 


014362 


006303 




136 


014364 


032704 


000010 


137 


014370 


001002 




138 


014372 


052703 


000001 


139 


014376 


005302 




HO 


014400 


001407 




141 


014402 


012760 


055401 


142 


014410 


012760 


051401 


143 


014416 


000757 




144 








145 








146 


0144 t 






147 


014420 


012737 


000230 


148 


014426 


010337 


0011 42 


149 


014432 


023737 


001140 


150 


014440 


001401 




151 


014442 


104044 




152 


014444 






153 








154 
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SEQ 0076 



90$: 



000024 
000024 



100$: 



CLR 

MOV 
BIT 
BE 0 
INC 
DEC 
BNE 
EMT 
BR 

MOV 
MOV 
BR 



R3 

RMMR1 (R0).R4 

#MWD,R4 

110$ 

R3 

R2 

100$ 

43 

160$ 



.-STORE RMMR1 AT R4 

;JUMP OUT OF LOOP WITH FIRST 1 
; INCREMENT ZERO COUNT 
;DECREMcNT MAX LOOP COUNT 



.•HEADER SYNC .CANT GET FIRST 1 



#MR1AAA.MCLK,RMMRKR0) 

#MR1AAA,RMMR1(R0) 

90$ 



;LOAD RMMR1 
;LOAD RMMR1 



.MAKE SURE THERE WERE AT LEAST 8 ZERO BITS IN HEADER SYNC 
110$: 

CMP R3,#8. 
BHIS 120$ 
EMT 43 

BR 160$ ; HEADER SYNC 



; SAM°LE AND STORE THE REST OF THE HEADER SYNC 
120$: 

MOV #8. ,R2 

CLR R3 



130$: 



140$: 



; NUMBER OF SAMPLES 
; HEADER SYNC 



000024 
000024 



001140 
001142 



MOV 
ASL 
BIT 
BNE 
BIS 
DEC 
BEO 
MOV 
MOV 
BR 



.-STORE RMMR1 AT R4 



.•SHIFT SAMPLE, IF SYNC BIT IS 1 
.-THEN SET SAMPLE INPUT 



RMMR1(R0).R4 
R3 

0MWD.R4 
140$ 

#BIT0.R3 
R2 
150$ 

#MR1AAA!MCLK,RMMR1(R0) ;LOAD RMMR1 
#MR1AAA,RMRRKR0) .LOAD RMMR1 

130$ ;D0 LOOP TIL R2=0 



; VERIFY THE SYNC BIT STREAM IS 0000000010011000 
150$: 

MOV #000230. SGDDAT 

MOV R3,$8DDAT 

CMP $GDDAT,$BDDAT 

BEQ 160$ 

EMT 44 

160$: 



;*TEST 21 



WRITE HEADER TEST 



014444 

014444 000004 

014446 000240 

014450 012706 001100 

014454 013700 001276 

014460 013701 001466 



TST21 



SCOPE 

NOP 

MOV 

MOV 

MOV 



.-SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$8ASE,R0 ;R0 = UNIBUS ADDRESS 

TST0UE.R1 ;R1 = POINTER TO DEVICE 



rZRMQBO RM05/3/2 DSKLS TST 
T 2' WRITE HEADER TEST 
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SEQ 0077 



1i55 
1156 
1157 
1158 
1159 
1160 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1168 
1169 
1170 
1171 
1172 



1173 
1174 
1175 



1176 
1177 
1178 
1179 
1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
7203 
1204 
1205 



014464 012737 000021 001226 



014472 
014500 
014506 
014514 
014522 
014526 

014532 
014536 

014542 
014546 
014552 
014560 



014572 
014574 
014576 
014602 
014602 
014606 
014610 
014612 



014616 
014616 
014622 



014626 
014626 
014634 
014642 
014646 
014652 
014654 
014656 
014660 



014664 
014664 
014670 
014672 
014674 



014676 
014704 
014710 
014714 



012737 
013737 
112737 
0 1 2737 
012702 
010237 

012712 
052722 

013712 
112712 
012737 
012737 



001466 
001334 
000036 
010000 
054636 
001416 

1 50000 
001466 

001334 
000036 
1 77776 
000063 



014566 004737 022432 



000403 
104000 
000137 

004737 
000403 
104000 
000137 



012702 
012704 



012760 
012760 
016003 
032703 
001004 
005304 
001363 
000137 



032703 
001062 
005302 
001015 



012737 
005037 
010037 
062737 



015432 
023304 

015432 



00001 7 
000041 



055401 
051401 
000024 
000040 



015432 



000200 



000200 
001142 
001136 
000024 



MOV 



#21 ,$TESTN 



; ; SET TEST NUMBER IN APT MAR BOX 



001446 
001420 
001420 
001444 



001414 
001412 



.•SETUP THE REGISTER OUTPUT BUFFER FOR SUBROUTINES 

:LAST CYLINDER 
SET LAST TRACK AND 
;LAST SECTOR 
:IN 16 BIT FORMAT 
; BUFFER ADDRESS 
; BUFFER STARTS 
; STORE FIRST HEADER WORD 
;SET MF/UF BITS GOOD. 16 BIT FORMAT AND 
;LAST CYLINDER 
; STORE SECOND HEADER WORD 
:SET LAST TRACK ADDRESS AND 
; SEC TOR ADDRESS. 
2 WORDS (2'S COMP) 
•WRITE HEADER COMMAND 



MOV 

MOV 

M0V8 

MOV 

MOV 

MOV 

MOV 
BIS 

MOV 
M0V8 
MOV 
MOV 



#822. .RMDCO 
LSTRK.RMDAO 
#30. , RMDAO 
#FMT16,RM0F0 
#8UFFER,R2 
R2.RMBA0 

#1 50000. (R2) 
#822.. (R2)* 

LSTRK, (R2) 
#30.. (R2) 
#-2.RMWC0 
#WH!G0.RMCS10 



10$: 



JSR 

BR 

EMT 

JMP 

JSR 
BR 
EMT 
JMP 



PC.ENBSCM 

10$ 

160$ 

PC.SCTCMP 
20$ 

160$ 



EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE . 
BRANCH TO 10$ IF NO ERROR 



.•FORCE SECTOR COMPARE USING SUBROUTINE 
.•BRANCH TO 20$ IF NO ERROR 



000024 
000024 



.-STEP THE DATA TIMING SEQUENCER UNTIL 'HEADER AREA'' COMES ON 
20$: 

MOV #15.. R2 .-ALLOW 15 MORE PROM STORBES 

30$: MOV #33.. R4 ;ALLOW 33 81 l CLOCKS PER PROM STROBE 

; PULSE BIT CLOCK UNTIL PROM STROBE IS ON 
40$: 

MOV #MR1AAA!MCLK,RMMR1(R0) .-LOAD RMMR1 

MOV #MR1AAA,RMMR1(R0) ; LOAD RMMR1 

MOV RMMR1(R0).R3 ;STORE RMMR1 AT R3 

BIT #WC.R3 

BNE 50$ 

DEC R4 

BNE 40$ 

JMP 160$ 



.•COUNT EXHAUSTED 



001140 
001136 



;SEE IF HEADER AREA CAME ON 
50$: 

81 T #PHA. R3 

BNE 80$ 

DEC R2 

BNE 60$ 

.-ERROR-HEADER AREA NEVER CAME ON 



MOV #PHA, SGDDAT 

CLR $8DDAT 

MOV R0.$8DADR 

ADD #RMMR1.$BDADR 



.•SETUP ERROR MESSAGE 



CZRMQBO RM05/3/2 DSKLS TST 2 
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U 



SEO 0078 



1206 014722 


104045 






1207 014724 


0001 37 


015432 




1208 








1209 








1210 0H730 








1211 0H730 


012760 


055401 


000024 


1212 014736 


012760 


051401 


000024 


1213 014744 


016003 


000024 




1214 014750 


032703 


000040 




1215 014754 


001404 






1216 014756 


005304 






1217 014760 


001363 






1218 014762 


000137 


015432 




1219 








1220 








1221 014766 








^22 014766 


016037 


000040 


001142 


1223 014774 


042737 


1 76000 


001142 


1224 015002 


022737 


000001 


001142 


1225 C15010 


001 704 






1226 015012 


010037 


001 1 36 




1227 015016 


062737 


000040 


001 1 36 


1228 015024 


012737 


000001 


001140 


1229 015032 


104042 






1230 015034 


000576 






1231 








1232 








1233 








1234 015036 








1235 015036 


012702 


y% A a y% s\ 

000005 




1236 015042 








015042 


012760 


055401 


000024 


1237 015050 


01 2760 


051401 


000024 


1238 015056 


005302 






1239 015060 


001370 






1240 








1241 








1242 015062 


005037 


001 1 74 




1243 015066 


005037 


001 1 76 




1244 015072 


012702 


001 1 74 




1245 015076 


012703 


000020 




1246 015102 


005004 






1247 015104 








1248 015104 


016005 


000024 




1249 015110 


006304 






1250 015112 


032705 


00001 0 




1251 015116 


001002 






1252 015120 


052704 


000001 




1253 015124 








015124 


012760 


055401 


000024 


1254 015132 


012760 


051401 


0000Z4 


1255 015140 


005303 






1256 015142 


001360 






1257 015144 


010422 






1258 015146 


022702 


001200 




1259 015152 


101415 






1260 









EMT 
JMP 



45 

160$ 



;SKIP REST OF TEST 



;UAIT FOR PROM STROBE TO GO Off 
60$: 



MOV *MR1AAA!MCLK,RMMR1 (RO) ;LOAD RMMR1 

MOV #MR1AAA.RMMR1 (RO) ;LOAD RMMR1 

MOV RMMR1(R0),R3 ;STORE RMMR1 AT R3 

BIT *WC,R3 

BEO 70$ 

DEC R4 

BNE 60$ 

JMP 160$ ; COUNT EXHAUSTED 



.-VERIFY THE TAG BUS ONCE EVERY PROM STROBE 
70$: 

RMMR2(R0) ,$8DDAT ;ST0RE RMMR2 AT $8DDAT 

tf*C1 777, $BDDAT 



MOV 
BIC 
CMP 
BEO 
MOV 
ADD 
MOV 
EMT 
BR 



08800, $8DDAT 
30$ 

RO , $BDADR 

#RMMR2,$BDADR 

08800. $GDDAT 

42 

160$ 



WRITE GATE SHOULD BE ON 
ALL ELSE Off 



; HEADER AREA IS NOW ON CAN START SAMPLE 

;DATA AFTER 5 MORE BIT CLOCKS 

80$: 

MOV #5.R2 

81$: 

MOV #MR1AAA!MCLK,RMMR1(R0) 
MOV #MR1AAA.«MMR1(R0) 
DEC R2 
BNE 81$ 

; SAMPLE AND STORE THE TWO HEADER WORDS 



.-LOAD RMMR1 
.-LOAD RMMR1 



90$: 
100$: 



110$: 



CLR 
CLR 
MOV 
MOV 
CLR 

MOV 
ASL 
BIT 
BNE 
BIS 

MOV 
MOV 

DEC 
BNE 
MOV 
CMP 
BLOS 



$TMPO 
$TMP1 
#$TMP0.R2 
016. ,R3 
R4 

RMMR1(R0).R5 
R4 

*MWD.R5 
110$ 

#8IT0.R4 



;R2 NUMBER Of WORDS/ADDRESS 
.•NUMBER Of BITS 
.'WORD STORAGE 

.•STORE RMMR1 AT R5 
;SHIfT WORD SAMPLE 
;SET BIT 0 IF WRITE BIT ON 



#MR1AAA!MCLK,RMMR1 (RO) 
0MR1AAA.RMMR1 (RO) 
R3 
100$ 

R4,(R2)+ 
#$TMP0+*,R2 
120$ 



.-LOAD RMMR1 
.-LOAD RMMR1 



STORF WORD SANPIE 
DONE ? 
YES 



1 26l 
1262 
1263 
V64 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 

1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
'.283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 

1294 
1295 
1296 
1297 
1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 



015154 
015160 
015162 
015166 
015174 
015202 
015204 



015206 
015206 

015210 
015210 
015214 
015220 
015222 
015230 
C15236 
015240 
015244 
015246 
015252 
015?6O 
015266 
015272 
015274 



015276 
015276 
015302 
015304 
0^5304 
015310 
015312 
015316 
015320 
015324 
015324 
01 5332 
015340 
015342 
015344 



015>.c 
015354 



015356 
015364 
015366 
015374 



042705 
001346 
010037 
062737 
012737 
104045 
000512 



005003 



016005 
042705 
001026 
012760 
012760 
005203 
022703 
101361 
010037 
062737 
012737 
005037 
104046 
000456 



012703 
005004 

016005 
006304 
032705 
001002 
052704 

012760 
012760 
005303 
001360 
010422 



177577 

001 1 36 
000024 
000200 



000024 
1 76777 

055401 
051401 

000020 

001136 
000024 
001000 
001H2 



000020 

000024 

000010 

000001 

055401 
051401 



022737 066313 
001025 



001 1 36 
001140 



.•HEADER AREA 

eic 

BNE 
MOV 
ADD 
MOV 
EMT 
8R 



SHOULD STILL BE ON FUR SECOND HEADER WORD 
#*C<PHA>.R5 

90$ .-BRANCH If ON 

RO.SBDADR 

#RMMR1 ,$8DADR 

#PHA.$GDDA T 

45 

160$ 



;WAIT UNTIL ECRC SSTS 
120$: 

CLR R3 



; CHECK NUMBER BITS b\ffZ?< BET PHA AND ECRC 



125$: 



000024 
000024 



001 1 36 
001140 



MOV 
BIC 
BNE 
MOV 
MOV 
INC 
CMP 
BHI 
MOV 
ADD 
MOV 
CLR 
EMT 
BR 



RMMRKR0).R5 
#*C<ECRO.R5 
127$ 

#MR1AAA!MCLK,RMMR1 (RO) 
#MR1AAA.RMMR1 (R0> 



R3 
#16.. R3 
125$ 

RO.$BDADR 

#RMMR1,$BDADR 

#ECRC.$GDDAT 

$BDDAT 

46 

160$ 



.-STORE RMMR1 AT R5 
.•CHECK OUT THE REST BITS 
.•BRANCH IF ECRC ON 
;LOAD RMHR1 
.-LOAD RMMR1 



; TOTAL NUMBER Of BIT DIFF 
.OVER ONE WORD ? 
.•BRANCH IF NOT 



; CLEAR THE EXP 
;EXIT 



; SAMPLE AND STORE CRC WORD 
127$: 



000024 
000024 



130$: 



140$: 



MOV 

CLR 

MOV 
ASL 
BIT 
BNE 
BIS 

MOV 
MOV 
DEC 
BNE 
MOV 



#16., R3 
R4 

RMMRKR0).R5 
R4 

#MWD,R5 
140$ 

#8IT0.R4 



STORE RMMR1 AT R5 
SHIFT WORD SAMPLE 
SET BIT 0 IF WRITE BIT ON 



#MR1AAA!MCLK.RMMR1 (RO) 

KMR1AAA.RMMRKR0) 

R3 

130$ 

R4,(R2>* 



.-LOAD RMMR1 
;LOAD RMMR1 



001174 



032737 
001411 
022737 
001015 



010000 001334 
074110 001176 



VERIFY 3 HEADER WORDS 

NOTE THAT DATA WAS STORED IN THE REVERSE 
ORDER FROM WHICH IT WAS WRITTEN 

LMP #066313.$TMP0 .-CORRECT FIRST HDR WRD ? 

BNE 150$ ."NO !! 

.-VERIFY 2ND AND 3RD HEADER WORDS FOR AN RM05 



BIT #TA16.LSTRK 

BEO 145$ 

CMP #074110.$TMP1 

BNE 150$ 



IS DEVICE AN RM05 ? 

NO ! ! 

CORRECT SECOND HDR WRD ? 
NO I. 



T21 



^ 51 5 
1516 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 



1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
1338 
1339 
1340 



1341 
1342 
1343 



1344 
1345 
1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 



RM05/3/2 DSKLS 


TST 2 


MACRO 


V04.00 4 
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WRITE HEADER TEST 
















015376 


022737 


16~073 


Ovl cUU 




CMP 


#1 67073. $TMP2 


.•CORRECT HEADER 


r ft r 

CRC 




015404 


001011 








BNE 


150$ 


;N0 . . 






015406 


00041 1 








BR 


160$ 














;VERIFV 


2ND 


AND 3RD HEADER WORDS FOR AN RM03 






015410 








145$: 












015410 


022737 


074040 


001176 




CMP 


#074040.$ TMP1 


.'CORRECT SECOND 


HDR 


WRD 


015416 


001004 








BNE 


150$ 


;N0 ! ! 






01 5420 


022737 


067510 


001200 




CMP 


#067510. $TMP2 


.CORRECT HEADER 


CRC 


-> 


015426 


001401 








BEO 


160$ 


;YES . ! 






015430 








150$: 












015430 


1040*. 7 








EMT 


47 








015432 








160$: 






;END OF SU8 TEST 












.-TEST 


22 


HEADER COMPARE 


TEST 







SEQ 0080 



015432 
CI 5432 
015434 
015436 
015442 
01 5446 
015452 



01 5460 
015466 
015474 
015502 
015510 
015516 
015524 



000004 
000240 
012706 
013700 
013701 
012737 



012737 
01 3737 
11 27;>7 
012737 
012737 
012737 
012737 



TST22: 



001100 
001276 
001466 
000022 



001466 
001334 
000036 
054636 
17/7/0 
010000 
000073 



001226 



001446 
001420 
001420 
001416 
001414 
001444 
001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



.-SCOPE CALL 

#STACK.SP .-LOAD THE STACK POINTER 

$8ASE.R0 ;R0 = UNI8US ADDRESS 

TST0UE.R1 ;R1 = POINTER TO DEVICE 

#22. $TESTN ;;SET TEST NUMBER IN APT MAIL BOX 



015532 004737 022432 



015536 
015540 
015542 
015546 
015546 
015552 
015554 
015556 



015562 
015562 
015566 
015574 
015600 



015604 
015604 
015612 



000403 
104000 
000137 

004737 
000403 
104000 
000137 



010037 
062737 
012702 
012704 



012760 
012760 



.-LOAD REGISTER OUTPUT BUFFER FOR READ HEADER COMMAND 

.'LAST CYLINDER 
;SET LAST TRACK AND 
.-LAST SECTOR 
.DATA ADDRESS 
;2 WORDS (2'S COMP) 
;16 BIT MODE 

.-READ HEADER AND DATA FUN 

.•EXECUTE DATA COMMAND TO POINT WHERE 
; SEARCH IS ENABLED USING SUBROUTINE. 
.•BRANCH TO 10$ IF NO ERROR 



016700 
023304 

016700 



001136 
000040 
000004 
000021 



055401 
051401 



10$: 



MOV 


#822..RMDCO 


MOV 


LSTRK.RMDAO 


M0V8 


#30. .RMDAO 


MOV 


#8UFFER.RMBA0 


MOV 


#-2,RMVC0 


MOV 


#FMT16.RM0F0 


MOV 


#RH!G0.RMCS10 


JSR 


PC.ENBSCH 


BR 


10$ 


EMT 




JMP 


230$ 


JSR 


PC.SCTCMP 


BR 


20$ 


EMT 




JMP 


230$ 



.-SKIP REST OF TEST IF ERROR 

.•FORCE SECTOR COMPARE USING SUBROUTINE 
; BRANCH TO 20$ IF NO ERROR 



001^36 



000024 
000024 



;READ GATE SHOULD BE OFF FOR 3 PROM STROBES 
20$: 

MOV R0.$8DADR ; SETUP ERROR MESSAGE 

ADD #RMMR2.$BDADR 

MOV #4,R2 ;R2=NUMBER OF PROM STROBES 

30$: MOV #17..R4 ;MAX BIT CLOCKS 

; CLOCK BIT CLOCK UNTIL PROM STROBE COMES ON 
40$: 

MOV #MR1AAA!MCLK.RMMR1 (RO) ;LOAD RMMR1 
MOV #MR1AAA.RMMP1 (RO) ; L OAD RMMR1 



C7RMQB0 RM05/3/2 DSKLS TST 2 
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MACRO Y04.00 
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SEO 0081 



1557 015620 


016003 


000024 


1558 015624 


032705 


C00040 


1 559 015650 


001004 




^0 015652 


005304 




1561 015654 


001365 




1 562 015656 


0001 57 


016700 


1565 






1564 






1565 015642 






1566 015642 


016005 


000040 


1567 015646 


042705 


1 76000 


15o8 015652 


001407 




1569 015654 


010557 


001142 


1570 015660 


005057 


001140 


1571 015664 


104050 




1572 015666 


000157 


016700 


1575 






1574 






1575 015672 






1576 C15672 


012760 


055401 


1577 015700 


012760 


05140I 


1578 015706 


016C05 


000024 


1579 015712 


052705 


000040 


1380 015716 


001404 




1381 015720 


005304 




1382 015722 


001365 




1383 015724 


000157 


016700 


1384 






1385 






1386 015730 






1387 015750 


005502 




1388 015732 


001522 




1389 






1390 






1391 






1392 






1393 015734 

1394 015740 


012702 


000006 


012703 


000021 


1395 






1396 






1397 015744 






1398 015744 


012760 


055401 


1399 015752 


012760 


051401 


1400 015760 


016004 


000024 


1401 015764 


032704 


000040 


1402 015770 


001004 




1403 015772 


005305 




1404 015774 


001563 




1405 015776 


000137 


016700 


1406 






1407 






1408 016002 






1409 016002 


016004 


000040 


1410 016006 


042704 


176000 


1411 016012 


022704 


000002 


1412 016016 


001410 




1413 016020 


010437 


001142 



MOV RMMR1(R0).R3 

BIT #UC.R3 

BNE 50$ 

DEC R4 

BNE 40$ 

JMP 250$ 



; STORE RMMR1 AT R5 

.-BRANCH WHEN PROM STROBE ON 



.-VERIFY READ GATE IS OFF AND TAG BUS IS ZERO 
50$: 

MOV RMMR2(R0).R5 ; STORE RMMR2 AT R3 

BIC #*C1777 R5 

BED 60$ ' ; BRANCH IF TAG BUS ZERO 

MOV R3.$8DDAT 

CLR $GDDAT 

EMT 50 

JMP 230$ ;READ HEADER FUNCTION 

; CLOCK BIT CLOCK TIL PROM STROBE GOES OFF 
60$: 

MOV *MR1AAA!MCLK.RMMR1(R0> .'LOAD RMMR1 
MOV #MR1AAA, RMMR1 (RO) ; LOAD RMMR1 

MOV RMMR1(r6).R3 .-STORE RMMR1 AT R3 
BIT #WC.R3 

BEQ 70$ ; BRANCH IF PROM STROBE OFF 

DEC R4 
BNE 60$ 
JMP 230$ 

; CONTINUE FOR 3 BIT CYCLE TOTAL (LOC 0 NOT SAMPLED) 
70$: 

DEC R2 
BNE 30$ 

;READ GATE SHOULD COME ON WITH NEXT PROM STROBE AND STAY 
;0N FOR 7 CYCLES (AND MORE) 



80$: 



MOV 
MOV 



#6-R2 
#17., R3 



; CLOCK BIT CLOCK TIL PROM STROBE SETS 
90$: 

MOV #MR1AAA!MCLK,RMMRKR0) ;LOAD RMMR1 

MOV #MR1AAA,RMMR1(R0) ;LOAD RMMR1 

MOV RMMR1(R0).R4 .-STORE RMMR1 AT R4 

BIT #WC,R4 

BNE 100$ .-BRANCH WHEN PROM STROBE ON 

DEC R3 

BNE 90$ 

JMP 230$ 

.-VERIFY READ GATE ON AND REST OF TAG BUS OFF 
100$: 

MOV RMMR2(RO).R4 ;STORF RMMR2 AT R4 

BIC * A C1777,R4 

CMP 088O1.R4 

BEQ 110$ .-BRANCH IF READ GATE ON 

MOV R4.$8DDAT 



CZRMQBO RM05/3/2 DSKLS TST 2 
'22 HEADER COMPARE TEST 



HH 016034 


012737 


00000? 


1415 016032 


104050 




1416 016034 


0001 37 


016700 


K17 






K18 






H19 016040 






1420 016040 


012760 


055401 


1421 016046 


012760 


051401 


1422 016054 


016004 


000024 


1423 016060 


032704 


000040 


1424 016064 


001404 




1425 016066 


005303 




1426 016070 


001363 




1427 016072 


000137 


016700 


K28 






1429 






1430 016076 






1431 016076 


005302 




1432 016100 


001317 




1433 






H34 






1435 016102 


012702 


000021 


H36 






U37 






1438 016106 






1439 016106 


012760 


055401 


1440 0161H 


012760 


051401 


K41 016122 


016003 


000024 


1442 016126 


032703 


000040 


KA3 016132 


001004 




1444 016134 


005302 




1445 016136 


001363 




1446 016140 


000137 


016700 


1447 






1448 






1449 016144 






1450 016144 


042703 


175777 


1451 016150 


001015 




1452 016152 


010337 


001142 


1453 016156 


012737 


002000 


1454 016164 


010037 


001136 


1455 016170 


062737 


000024 


1456 016176 


104035 




1457 016200 


0001 37 


016700 


1458 016204 






1459 016204 


012703 


000005 


1460 






1461 






1462 016210 






1463 0i6210 


012760 


055401 


1464 016216 


012760 


051401 


1465 016224 


005303 




1466 016226 


001370 




K67 






1468 

1469 016230 


012702 


0000^1 


1470 016234 


012703 


000010 



MACRO V04.00 



001140 
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MOV #8801.$GDDAT 
EMT 50 
JMP 230$ 



;READ HEADER FUNCTION 



000024 
000024 



; CLOCK BIT CLOCK TIL PROM STROBE GOES OFF 
110$: 

MOV *MR1AAA!MCLK,RMMR1(R0) ;LOAO RMMR1 

MOV 0MR1AAA.RMMR1 (RO) ; L OAD RMMR1 

MOV RMMR1(R0),R4 ; STORE RMMR1 AT R4 

BIT #WC.R4 

BEQ 120$ ; BRANCH WHEN PROM STROBE OFF 

DEC R3 

BNE 110$ 

JMP 230$ 

.•CONTINUE FOR TOTAL OF 7 CYCLES 
120$: 

DEC R2 

BNE 80$ 

.-LOOKING FOR SYNC SHOULD SET WITH NEXT PROM ST0R8E 

MOV #17..R2 ;MAX BIT CLOCKS 

.-CLOCK BIT CLOCK TIL PROM STROBE SETS 
130$: 

MOV *MR1AAA!MCLK,RMMR1(R0> ;LOAD RMMR1 

MOV *MR1AAA,RMMRKR0) ;LOAD RMMR1 

MOV RMMR1(R0),R3 ; STORE RMMR1 AT R3 

BIT *WC,R3 

BNE 140$ 

DEC R2 

BNE 130$ 

JMP 230$ 

.-VERIFY •VLFS" IS NOW ON 
140$: 



.-BRANCH WHEN PROM STROBE ON 



150$: 



Bit #*CPLFS,R3 

BNE 1 50$ 

MOV R3,$6DDAT 

MOV #PU S,»GDDAT 

MOV R0,$8DADR 

ADD #RMMR1 ,$BDADR 

EMT 35 

JMP 230$ 

MOV #5,R3 



;WJTH PLFS ON, WORD COUNT INHIBIT WILL SET IN 5 BIT CLOCKS 
1S5$: 

MOV *MR1AAA!MCLK.RMMR1(R0) ;LOAD RMMR1 

MOV *MR1AAA,RMMRKR0) .'LOAD RMMR1 

DEC R3 

BNE 155$ 

; SIMULATE THE SYNC PATTERN BEING READ 

MOV #31. R2 ;SYNC PAT TERN=0001 1001 

MOV #8.,R3 ;8 BITS IN PATTERN 
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SEO 0083 



1471 


016240 








K72 


016240 


012737 


C55401 


001436 


1473 


016246 


000241 






1474 


016250 


006002 






1475 


016252 


103003 




001436 


1476 


016254 


052737 


002000 


1477 


016262 








1478 


016262 


013760 


001436 


000024 


1479 


016270 


042737 


004000 


001436 


1480 


016276 


013760 


001436 


000024 


1481 


016304 


005303 






1482 


016306 


001 354 






1483 










1484 










1485 


016310 


012702 


001174 




1486 


016314 


012737 


1 50000 


001 1 74 


1487 


016322 


052737 


001466 


001 1 74 


1488 


016330 


013737 


001334 


001176 


1489 


016336 


112737 


000036 


001 1 76 


1490 


C16344 


012737 


01 1 366 


001200 


1491 


016352 


032737 


010000 


001334 


1492 


016360 


001403 






1493 


016362 


012737 


156167 


001200 


1494 


016370 








1495 


016370 


012703 


000020 




1496 


016374 


012204 






1497 


016376 








1498 


016376 


012737 


055401 


001436 


1499 


016404 


000241 






1500 


016406 
016410 


006004 






1501 


103003 






150^ 


016412 


052737 


002000 


001436 


1503 


016420 










016420 


013760 


001436 


000024 


1504 


016426 


042737 


004000 


001436 


1505 


016434 


013760 


001436 


000024 


1506 


016442 


005303 






1507 


016444 


001354 






1508 


016446 


020227 


001200 




1509 


016452 


101746 






1510 










1511 










1512 


016454 


012702 


000006 




1513 


016460 


012703 


000021 




1514 










515 










1516 


016464 








1517 


016464 


01276C 


055401 


000024 


1518 


016472 


012760 


051401 


000024 


1519 


016500 


016004 


000024 




1520 


016504 


032704 


000040 




1521 


016510 


001003 






1522 


016512 


005303 






1523 


016514 


001 363 






1524 


016516 


000470 






1525 










1526 











165$: 



MOV 
CLC 
ROR 
BCC 
BIS 

MOV 
BIC 
MOV 
DEC 
BNE 



#MR1 AAA.MCLK.RMMR10 

R2 
165$ 

#MRD , RMMR 1 0 



RMMR10.RMMR1 (RO) 
0MCLK.RMMR1O 
RMMR10.RMMRKRO) 
R3 

160$ 



.-LOAD RMMR1 



; SIMULATE THE HEADER BEING READ 



170$: 
175$: 

180$: 



MOV 

MOV 

BIS 

MOV 

M0V8 

MOV 

BIT 

BEO 

MOV 

MOV 
MOV 

MOV 
CLC 
ROR 
BCC 
BIS 

MOV 
BIC 
MOV 
DEC 
BNE 
CMP 
BLOS 



#$TMP0,R2 
#1 50000. $TMPO 
*822.,$TMP0 
LSTRK.$TMP1 
#30..$TMP1 
#011366.$TMP2 
0TA16.LSTRK 
170$ 

#1 56167. STMP2 

#16.. R3 
(R2>,R4 



;LOAD RMMR1 
.'CONTINUE TIL SHIFT COUNT 
;IS ZERO 



SET MF/UF BITS GOOD, 16 BIT FORMAT AND 

LAST CYLINDER 

SET LAST TRACK AND 

LAST SECTOR 

GET CRC PATTERN 

IS DEVICE AN RM05 ? 

NO !! 

YES. ADJUST CRC PATTERN 



."NUMBER OF BITS EACH WORD 
.•HEADER WORD 1,2 OR 3 



#MR1AAA!MCLK,RMMR10 
R4 

180$ 

#MRD.RMMR10 



; LOAD RMMR1 



RMMR10,RMMR1(R0) 
#MCLK.RMMR10 
RMWR10.RMMR1 (RO) ."LOAD RMMR1 

R3 .-SHIFT OUT 16 BITS 

175$ 

R2.#$TMP0*4 
170$ 



;ALL DONE ? 
.•BRANCH IF NOT 



.•LOOKING FOR SYNC SHOULD COME ON WITHIN 6 STROBES 

MOV #6,R2 

185$: MOV #17. .R3 

; CLOCK UNTIL PROM STR08E ON 
190$: 

MOV 0MR1AAAIMCLK.RMMR1 (RO) ; L OAD RMMR1 

MOV ttm 1 AAA, RMMR 1 (RO) ."LOAD RMMR1 

MOV RMMR1(R0).R4 .-STORE RMMR1 AT R4 

BIT #WC.R4 

BNE 195$ 

DEC R3 

BNfc 190$ 

BR 230$ 

; SEE IF 'PLFS" IS ON 



rZRMQBO RM05/3/2 DSKLS 1ST 2 
T 22 HEADER COMPARE TEST 



6 7 
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1527 


016520 






1528 


016520 


042704 


175777 


1529 


016524 


001034 




^30 








1531 








1532 


016526 


005302 




1533 


016530 


001014 




1534 


016532 


010437 


001142 


1535 


016536 


012737 


002000 


1536 


016544 


010037 


001136 


1537 


016550 


062737 


000024 


1538 


016556 


104035 




1539 


016560 


000447 




1540 








15'1 








1542 


016562 






1543 


016562 


012760 


055401 


1544 


016570 


012760 


051401 


1545 


016576 


016004 


000024 


1546 


C16602 


032704 


0C0040 


1547 


016606 


001 724 




1548 


016610 


005303 




1549 


016612 


001363 




"550 


016614 


000431 




1551 








1552 








1553 


016616 






1554 


016616 


016037 
042737 


000014 


1555 


016624 


177157 


1556 


016632 


001411 




1557 


016634 


005037 


001140 


1558 


016640 


010037 


001136 


1559 


016644 


062737 


000014 


1560 


016652 


104051 




1561 


016654 


000411 




1562 








1563 








1564 


016656 






1565 


016656 


023737 


054636 


1566 


016664 


001004 




1567 


016666 


023737 


054640 


1568 


CI 6674 


001401 




1569 








1570 








1571 


016676 






1572 


016676 


104052 




1573 


016700 






1574 








1575 









016700 

016700 000004 

016702 000240 

016704 012706 001100 

016710 013700 001276 



EQ 0084 



195$: 



BIC 
BNE 



# A CPLFS,R4 
210S 



001140 
001 1 36 



000024 
000024 



.•CONTINUE IF LESS THAN 6 PROM STR08ES 
DEC R2 
BNE 200$ 
MOV R4.$BDDAT 
MOV #PLFS.$GDDAT 
MOV RO.$BDADR 
ADD #RMMR1 ,$BDADR 
EMT 35 
BR 230$ 

; CLOCK UNTIL PROM STROBE OFF 
200$: 



; SETUP ERROR 



.•HEADER 



001142 
001142 



001136 



001 1 74 
001 1 76 



MOV #MR1AAA!MCLK,RMMR1 (RO) ;LOAD RMMR1 

MOV *MR1AAA,RMMR1 (RO) ; L OAD RMMR1 

MOV RMMR1(R0).R4 .-STORE RMMR1 AT R4 

BIT *WC,R4 

BEQ 185$ 

DEC R3 

BNE 200$ 

BR 230$ 

."VERIFY NO HEADER ERROR IS SET 
210$: 

MOV RMER1 (RO) .$8DDAT .-STORE RMER1 AT $8DDAT 

BIC #*C<HCRC!HCE.'FER>.$8DDAT 

BEQ 220$ 

CLR $GDDAT 

MOV RO , $8DADR 

ADD #RMER1.$8DADR 

EMT 51 

BR 230$ 



.-VERIFY DATA IN MEMORY OK 
220$: 

CMP BUFFER.$TMPO 
BNE 225$ 
CMP BUFFER*2.$TMP1 
BEQ 230$ 



.-HEADER ERROR SET 

.•COMPARE 1ST HEADER WORD 
; COMPARE 2ND HEADER WORD 



; REPORT ERROR IN ONE OR MORE HEADER WORDS 
225$: 

EMT 52 

230$: 



;»TEST 23 



ECC GENERATION TEST 



TST23: 



SCOPE 
NOP 
MOV 
MOV 



.-SCOPE CALL 

#STACK,SP ;LOAD THE STACK POINTER 

$BASE.RO ;R0 = UNI8US ADDRESS 



CZRMQBO RM05/3/2 DSKLS 1ST 2 
T25 ECC GENERATION TEST 



H 7 



016714 


013701 


001466 




016720 


012737 


C00023 


001226 


1576 








1577 








1578 0 n 6726 


012737 


001466 


001446 


1579 016734 


013737 


001334 


001420 


1580 016742 


112737 


000036 


001420 


1581 016750 


012737 


012000 


001444 


1582 016756 


012702 
01023? 


054636 




1583 016762 


001416 




1584 016766 


012703 


177400 




1535 016772 


010337 


001414 




1586 016776 


012737 


000061 


001412 


1587 








1588 








1589 017004 


012704 


177777 




1590 017010 


012703 


000400 




1591 017014 


010422 






1592 017016 


005303 






1593 CI 7020 


001 375 






1594 








1595 017022 


004737 


022432 





1596 
1597 
1598 



1599 
1600 
1601 



1602 
1603 
1604 



1605 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 



017026 
017030 
017032 
017036 
017036 
017042 
01 7044 
017046 
017052 
01 7052 
017056 
017060 
017062 
017066 
017066 
017072 
017074 
017076 



000403 
104000 
000137 

004737 
000403 
104000 
000137 

004737 
000403 
104000 
000137 

004737 
000403 
-104000 
000137 



020066 
023304 

020066 
023412 

020066 
023574 

020066 



017102 012702 017634 



017106 
017106 



017112 



004737 017654 
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MOV TSTQUE.R1 ;R1 = POINTER TO DEVICE 

MOV #23.$TESTN ;;SET TEST NUMBER IN APT MAJL BOX 

.•SETUP REGISTER OUTPUT BUFFER FOR WRITE DATA CAMOMMAND 



SEO 0085 



LAST CYLINDER 
SET LAST TRACK AND 
LAST SECTOR 

;16 BIT FORMAT, IGNORE HfcADER 



MOV *822..RMDCO 

MOV LSTRK.RMDAO 

M0V8 *30..RMDAO 

MOV *FMT16!HCJ,RM0F0 

MOV *8UFFER,R2 

MOV R2,RMBA0 ;DATA ADDRESS 

MOV #-256.. R3 ;256. WORDS (2'S COMP) 

MOV R3.RMWC0 

MOV #WD!G0,RMCS10 ; WRITE DATA COMMAND 

;FJLL THE DATA BUFFER WITH ALL ONES 



10$: 



MOV 


#177777,R4 


;DATA PATTERN ALL ONES 


MOV 


#256. ,R3 


;ONE SECTOR DATA FIELD 


MOV 


R4, (R2)* 




DEC 


R3 




BNE 


10$ 




JSR 


PCENBSCH 


.•EXECUTE DATA COMMAND TO POINT WHERE 






.•SEARCH IS ENABLED USING SUBROUTINE . 


BR 


20$ 


; BRANCH TO 20$ IF NO ERROR 


EMT 




• 


JMP 


400$ 




JSR 


PC.SCTCMP 


.•FORCE SECTOR COMPARE USING SUBROUTINE 


BR 


30$ 


.•BRANCH TO 30$ IF NO ERROR 


EMT 






JMP 


400$ 




JSR 


PCSdTLFS 


;SET 'lOOKING FOR SYNC" USING SUBROUTINE 


BR 


40$ 


.•BRANCH TO 40$ IF NO ERROR 


EMT 






JMP 


400$ 




JSR 


PCCLKSNC 


; CLOCK THE SYNC PATTERN USING SUBROUTINE 


BR 


50$ 


;BR TO 50$ IF NO ERROR 


EMT 




JMP 


400$ 





20$: 



30$: 



40$: 



HEADER COMPARE IS INHIBITED FOR THIS TEST 

CLOCK THE DATA TIMING SEQUENCER AND VERIFY THE FOLLOWING WAVEFORMS 
FOR EACH LEADING EDGD OF PROM STROBE 

HEADER ARES, READ GATE (DATA TIMING SEOUENCER=200 OCTAL) 

ENABLE CRC OUT 

WRITE GATE 



50$: 



MOV 



#230$, R2 



.•POINTER TO WAVE FORM TABLE 



; CLOCK BIT CLOCK (MCLK) UNTIL PROM STROBE COMES ON 
70$: 

JSR PC, 300! 

;PROM STROBE IS ON - VERIFY WAVEFORM 
80$: 



r ZRMQBO RM05/3/2 DSKLS TST 2 
T 23 ECC GENERATION TEST 
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SEO 0086 



1 A- "1"* 


01/112 


Ai/. aT7 


A A A A - ) / 

0000<?4 


AA1 1/0 
001 \Hd 


16? 3 


01 7120 


A/ *S777 

0^2757 


1 7^. 1 C 7 


A A 1 1 / O 

001 1^<: 


1 O/ 

1624 


Al 71 1/ 

01 /126 


01223/ 


AA1 1 / A 

001 IsO 




1625 


017132 


023/3/ 


AA* 1 / A 


AAl 1 y ") 

00 1 Ih^ 


1626 


01 7 140 


A A 1 / 1 A 

OOIhIO 






162/ 










'628 










1629 


ai 71 / "i 


A 1 AA7 7 

01005' 


AA1 1 1/1 

00 11 3d 




5 ^ 7A 

1630 


01 /146 


a / t 77 7 

062757 


AAA A T 7 

00002»» 


AAI 1 7*. 

001 1 3d 


1631 


01 71 54 


1 A / AC/ 

1 04054 






1652 


01/156 


0001 5/ 


r> OAAA A 

U2UU66 




1 653 










16 54 










1 AK 

' 65 j 


A1 71 AO 

Ul / l 62 








1 a ?i 
1 656 


AI 71 AO 

01 / 162 


A1 A A"? 7 

U16U5/ 


AAAA/ A 

UUUU4U 


AAI I/O 


165/ 


A1 71 7A 

U I 1 1 /U 


A/ 077 7 

U4<r/ 5/ 


1 7AAOA 


001 K2 


1 ^ 7Q 

1658 


A1 71 7A 
01 /I /6 


A1 0077 

U1225/ 


AA 1 1 / A 

UU I I hU 




1659 


A1 7OA0 

Ul / cU2 


A01777 

Veil 5/ 


aai i / n 
UU 1 1 "tU 


AAI 1/0 
UU 1 1 


1 A/ A 

I64U 


A1 701 A 

Ul /21U 


AA 1 / 1 A 

UU 1 4 1 U 






1 a/ i 

1 64 1 










i a/ o 

1 64 <r 










1645 


A1 701 O 

Ul /212 


A1 AA77 
Ul UU5/ 


AAI 1 1A 

UU 1 1 36 


AAI 1 7A 


1 A/ / 

1 644 


A1 701 A 
Ul IC 16 


AA3777 


AAA AAA 
UUUU*»U 


" a_' C 


A1 700A 


IU4U-) J 






1 A/ A 

1646 


A1 700A 

Ul /226 


AAA1 17 
UUU1 0/ 


UcA>U66 




1 64 / 










1 A/ Q 

164(5 










1 A/ Q 

1 64 V 


A1 7010 








i aca 
1 6jU 


A1 707.0 
U I / L JL 


Art/. 777 
UU4 / J / 


U I / fOc 




1651 










1 A 

165<r 










1 ac < 

1 6 JO 


A1 707.A 
U I ' A JO 








1 AC/ 

165*» 


A1 707.A 
U I / C JO 


A0AO07 


A1 7AC 3 




1655 


A1 70/ 0 
Ul /V4£? 


1 A7701 
lUj/iTl 






1 A CA 

1656 










165/ 










1 1 CB 
1600 


.11 70AZ. 
U I ' a44 


A1 07A0 
U \d.f\)d 


AAAA1 1 
UUUU I I 




i65y 










1 AAA 

1660 










1 AA1 

1661 


A1 70CA 
Ul /AOU 








1662 


A1 70CA 

Ul / 25U 


AA/ 777 
UU4 (31 


A1 7AC/. 
U I /604 




1665 










1 AAV 

1664 










1 AA C 

1665 


A1 7* , C7 

U I /«_54 








1 AAA 

1666 


A1 70C/ 

Ul / 254 


A1 AAA/ 

U I6UU4 


AAAiTOA 
UUUUC4 




1 AA7 

166/ 


A1 70AA 

U I f do\) 


A/ 07A/ 
U4c /U4 


1 77777 
I / / J/ / 




1 AAO 

1 660 


A1 70A/ 

Ul /a64 


AA1 AOA 
UU I Uav 






166V 










16/U 










1 A 71 

16/1 


A1 70AA 

Ul ' c66 








ID' t 


w 1 / COD 




01 77ft? 
win Ul 




1673 


017272 


005302 






1674 


017274 


001365 






1675 










1676 










1677 


017276 


012737 


000400 


001 HO 


1678 


017304 


005037 


001K2 





MOV RMMR1 (RO).SBDDAT ; STORE RMMR1 AT S8DDAT 

BJC # A C<ECRC.PDA.PHA.EECO,$8DDAT 

MOV (R2)*.$GDDAT 

CMP SGDDAT ,$BDDAT 

BEQ 90$ ;8RANCH IF RMMR1 OK 

; ERROR - THE DATA TIMING SEQUENCER OUTPUT IS 0NC0RRECT 

MOV R0,$BDADR 

ADD #RMMR1 ,$BDADR 

EMT 54 

JMP A 00$ 



; STORE RMMR2 AT $8DDAT 



; BRANCH IF TAG BUS OK 



.•VERIFY THE TAB BUS 
90$: 

MOV RMMR2(R0) ,$8DDAT 

BIC #*C1 777. $8DDAT 

MOV (R2>*.$GDDAT 

CMP $GDDAT,$BDDAT 

BEQ 100$ 

; ERROR- TAG BUS IS WRONG 
MOV R0,$8DADR 
ADD #RMMR2,$8DADR 
EMT 53 
JMP 400$ 

; CLOCK BIT CLOCK TIL PROM STROBE RESETS 
100$: 

JSR PC, 350$ 

; CONTINUE CHECKING THROUGH 4 PROM CYCLES 
110$: 

CMP R2.*230$*16 
BLO 70$ 

.•VERIFY THAT DATA AREA COMES ON WITHIN 9 PROM STROBES 
MOV *9..R2 ;R2=9 STROBES 

; CLOCK PROM STROBE ON 
130$: 

JSR PC. 300$ 

;PR0M STROBE ON CKECK IF DATA AREA ON 
140$: 

MOV RMMR1(R0),R4 .-STORE RMMR1 AT R4 
BIC #*CPDA,R4 
BNE 160$ 

.-CLOCK PROM STROBE OFF 
150$: 

JSR PC. 350$ 
DEC R2 
BNE 1 30$ 

.•ERROR-DATA AREA DIDN'T COMF ON 

MOV #PDA.$GDDAT ;SETUP ERROR MESSAGE 
CLR $8DDAT 



CZRMQBO RM05/3/2 DSKLS T S T 2 
T 23 ECC GENERATION TEST 
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SEQ 0087 



1679 


017310 


010037 


001 1 36 


1680 


017314 


062737 


C00024 


1681 


017322 


104055 




1682 


01 7324 


000541 




1683 








1684 








1685 


017326 






1686 


017326 


012702 


000400 


1687 








1688 








1689 


017332 






1690 


01 7332 


016003 


000024 


1691 


01 7336 


042703 


177^57 


1692 


017342 


022703 


000400 


1693 


01 7346 


001414 




1694 


017350 


010337 


001142 


1695 


01 7 354 


012737 


000400 


1696 


017362 


010037 


001136 


1697 


017366 


062737 


000024 


1698 


CI 7374 


104055 




1699 


017376 


000514 




1700 








1701 








1702 


017400 






1703 


01 7400 


004737 


01 7 762 


1704 








1705 








1706 


017404 


004737 


01 7654 


1707 








1708 








1709 


017410 


005302 




1710 


017412 


001347 




171 1 








1712 








1713 


017414 


005002 




17K 


017416 








017416 


016003 


000024 


1715 


017422 


042703 


177357 


1716 


01 7426 


022703 


000020 


1717 


017432 


001426 




1718 


01 7434 


005202 




1719 


017436 


012760 


055401 


1720 


01 7444 


012760 


051401 


1721 


01 7452 


022702 


000007 


1722 


017456 


101357 




1723 


017460 


010337 


001142 


1724 


017464 


012737 


000020 


1725 


017472 


010037 


001136 


1726 


017476 


062737 


000024 


1727 


017504 


104056 




1728 


A1 7CA1 

01 7506 


c\f\f\/ ca 
000450 




1729 








1730 








1731 


017510 






1732 


017510 


012702 


001 1 74 


1733 


017514 


005003 




1734 


017516 


012704 


000020 



001 1 36 



001140 
001136 



MOV R0.S8DADR 

ADD #RMMR1 ,$BDADR 

EMT 55 

BR 220$ 

.■VERIFY THAT DATA AREA IS ON FOR 256 CrCLES 
160$: 

MOV #256., R2 

.•VERIFY THAT DATA AREA IS ON AND ECC IS OFF 
170$: 

MOV RMMR1 (R0),R3 ."STORE RMMR1 AT R3 

BIC # A C<PDA!EECC>.R3 

CMP #PDA,R3 

BEO 180$ ;DATA AREA IS ON 

MOV R3,$BDDAT 

MOV #PDA,$GDDAT 

MOV RO,$BDADR 

ADD #RMMR1.$BDADR 

EMT 55 

BR 220$ 

; CLOCK PROM STROBE OFF 
180$: 

JSR PC. 350$ 

.•CLOCK PROM STROBE ON 

JSR PC. 300$ 

.•CONTINUE TIL COUNT ZERO 



DEC 
BNE 



R2 
170$ 



;ECC SHOULD BE ENABLED WITHIN 4 CLOCK BITS 
182$: 



000024 
000024 



001140 
001136 



190$: 
195$: 



CLR 


R2 




MOV 


RWR1(R0).R3 ; STORE 


RMMR1 AT R3 


BIC 


#*C<PDA!EECO.R3 




CMP 


#EECC.R3 




BEO 


190S 




INC 


R2 




MOV 


iKWR'lAAAIMCLK.RMMRI (R0> 


;LOAD RMMR1 


MOV 


#MR1AAA.RMMR1(R0> 


;LOAD RMMR1 


CMP 


#7.R2 




BHI 


182$ 




MOV 


R3.$8DDAT 




MOV 


*EECC,$6DDAT 




MOV 


RO.$BDADR 




ADD 


#RMMR1 . $BDADR 




EMT 


56 




BR 


220$ 




ECC 


CHARACTER FOR 32 BITS 




MOV 


#$TMP0,P2 




CLR 


R3 




MOV 


#16. .R4 





CZRMQBO RM05/3/2 DSKLS TST 2 
T 23 ECC GENERATION TEST 



1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 



017522 
017522 
017526 
017530 
017534 
017536 
017542 
017542 
017550 
017556 
01 7560 
017562 
017564 
017570 



MACRO V04.00 



200$: 



K 7 
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SEO 0088 



016005 


000024 




MOV 


006303 






ASL 


032705 


000010 




BI T 


001002 






BNE 


052703 


000001 


<tUj»: 


BIS 


012760 


055401 


000024 


MOV 


012760 


051401 


000024 


MOV 


005304 






DEC 


001360 






BNE 


010322 






MOV 


022702 


001200 




CMP 


101351 






BHI 



RMMR1(R0),R5 ; STORE RMMR1 AT R5 
R3 

#MWD.R5 

205$ ; BRANCH IF ECC BIT OFF (MWD INVERTED) 

#8JT0,R3 



017572 
017600 
017602 
C17610 
017612 
017620 
017626 



022737 
001004 
022737 
001407 
012737 
012737 
104061 



131177 

175154 

131177 
175154 



001174 

001176 

001200 
001202 



.•VERIFY ECC 
CMP 
BNE 
CMP 
BEO 
MOV 
MOV 
EMT 



210$: 



017630 000137 020066 



017634 
017636 
017640 
017642 
017644 
017646 
017650 
017652 

017654 
017662 
017662 
017670 
017676 
017704 
017712 
017714 
017720 
017722 
017730 
017736 
017742 
017750 
017752 
017754 
017756 
017760 

017762 

017770 



000200 
000002 
000200 
000002 
000000 
000002 
000000 
000000 

012737 000021 017756 



220$: 
230$: 



012760 
012760 
016037 
042737 
001020 
005337 
001360 
013737 
012737 
010037 
062737 
104030 
000445 
000207 
000000 
000000 



055401 
051401 
000024 
177737 

017756 

01 7756 
000040 
001136 
000024 



000024 
000024 
01 7760 
01 7760 



001142 
001140 

001136 



300$: 
305$: 



310$ 
320$ 
330$ 



#MR1AAA!MCLK.RMMR1 (RO) 
#MR1AAA ,RMMR1 (RO) 
R4 

200$ 

R3,(R2>* 

#$TMP0*4,R2 

195$ 

CHARACTER GENERATED 
#1311 77. $TMP0 
210$ 

#1 75154. $TMP1 
220$ 

#1311 77. $TMP2 
#175154,$TMP3 
61 



;LOAD RMMR1 
;LOAD RMMR1 



JMP 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

MOV 

MOV 

MOV 

MOV 

BIC 

BNE 

DEC 

BNE 

MOV 

MOV 

MOV 

ADD 

EMT 

BR 

RTS 

.WORD 

.WORD 



012737 000021 020062 350$: MOV 

355$: 



400$ 

PHA 

8801 

PHA 

8801 

0 

2 

0 

0 

#17.. 320$ 



; GREAT ESCAPE 



; CLOCK PROM STROBE Of J 



#MR1AAA!MCLK.RMMR1(R0) ;LOAD RMMR1 
#MR1AAA,RMMR1 (RO) ;LOAD RMMR1 

RfW1(R0>.330$ .-STORE RMMR1 AT 330$ 
#*CWC.330$ 

310$ ;EXIT IF PROM STROBE ON 

320$ 
305$ 

320$.$8DDAT 
#WC,$GDDAT 
RO.$BDADR 
#RMMR1 ,$8DADR 
30 

400$ 

PC 
0 
0 



.-SETUP ERROR MESSAGE 



;MAX BIT COUNT 
;RMMR1 CONTFNTS 



#17.. 370$ 



.•CLOCK PROM STROBE OFF 



CZRMQBO RM05/3/2 DSKLS 
T25 ECC GENERATION 



1790 

1791 

1792 

1793 

1794 

1795 

17% 

1797 

1798 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

1808 

1809 

1810 



017770 
01 7776 
020004 
020012 
020020 
020022 
020026 
020030 
020036 
020042 
020046 
020054 
020056 
020060 

020062 
020064 

020066 
C20066 



012760 
012760 
016037 
042737 
001417 
005337 
001 360 
013737 
005037 
010037 
062737 
104062 
000403 
000207 

000000 
000000 



000240 



TS T 2 
TEST 

055401 
G51401 
000024 
177737 

020062 

020064 
001140 
001136 
000024 
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000024 
000024 
020064 
020064 



001142 
001136 



360$: 

370$: 
380$: 

400$: 



MOV 

MOV 

MOV 

BIC 

BEQ 

DEC 

BNE 

MOV 

CLR 

MOV 

ADD 

EMT 

BR 

RTS 

.WORD 
.WORD 



NOP 



SfO 0089 



0MR1AAA.MCLK.RMMR1 (R0> ;L0AD RMMR1 

0MR1AAA.RMMR1 (R0> ; L OAD RMMR1 

RMMR1(R0),380$ ; STORE RMMR1 AT 380$ 

# A CWC,380$ 

360$ 

370$ 

355$ 

380$,$BDDAT 

$6DDAT 

R0,$8DADR 

*RMMR1,$BDADR 

62 

400$ 
PC 



0 

0 



;MAX BIT COUNT 
.•CONTENTS OF RMMR1 

;SU8-TEST EXIT POINT 



.-•TEST 24 



ECC DETECTION TEST 



020070 
020070 
020072 
020074 
020100 
020104 
020110 

1811 
1812 

1813 020116 

1814 020124 

1815 020132 

1816 020140 

1817 020146 

1818 020152 

1819 020156 

1820 020164 
1821 

1822 020172 
020172 

020176 
020200 

1823 020202 
1824 

1825 020206 
020206 
020212 
020214 

1826 020216 
1827 

1828 020222 



000004 
000240 
012706 
013700 
013701 
012737 



012737 
013737 
112737 
012737 
01 2702 
010237 
012737 
012737 



TST24 : 



000403 
104000 
000137 



004737 
000403 
104000 
000137 



001100 
001276 
001466 
000024 



001466 
001334 
000036 
012000 
054636 
001416 
177400 
000071 



004737 022432 



021054 
023304 
021054 



001226 



001446 
001420 
001420 
001444 



001414 
001412 



SCOPE 

NOP 

MOV 

MOV 

MOV 

MOV 



; SCOPE CALL 

fSTACK.SP ; LOAD THE STACK POINTER 

$8ASE,R0 ;R0 = UNJBUS ADDRESS 

TSTQUE,R1 ;R1 = POINTER TO DEVICE 

#24,$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 



SETUP REGISTER OUTPUT BUFFER FOR READ DATA COMMAND 



20$: 



30$: 



40$: 



MOV 

MOV 

M0V8 

MOV 

MOV 

MOV 

MOV 

MOV 



JSR 

BR 

EMT 

JMP 



JSR 
BR 
EMT 
JMP 



#822..RMDC0 ;LAST CYLINDER 

LSTRX.RMDAO ;SET LAST TRACK AND 

#30.,RMDA0 ;LAST SECTOR 

#FMri6!HCI.RM0F0 ; INHIBIT HEADER COMPARE 

J8UF0NE.R2 

R2.RMBA0 

#-256.,RMWC0 ;256 WORDS (2'S COMP) 

#RD!G0,RMCS10 ;READ DATA COMMAND 



PCENBSCH 

30$ 

190$ 



PC.SCTCMP 
40$ 



EXECUTE DATA COMMAND TO POINT WHERE 
SEARCH IS ENABLED USING SUBROUTINE. 
8RANCH TO 30$ IF NO ERROR 



; FORCE SECTOR COMPARE USING SUBROUTINE 
; BRANCH TO 40$ IF NO ERROR 



190$ 



C7RMQB0 RM05/3/2 DSKLS TST 2 
T24 ECC DETECTION TEST 



M 7 
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SEC 0090 



1829 
1830 
1831 



1832 
1833 
1834 
1835 
1836 
1837 
1838 
1839 
1840 
1841 

1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
1878 



020222 
020226 
020230 
020232 

020236 
020236 
020242 
020244 
020246 



020252 
020256 
020260 
020264 
020270 
020272 
C20272 
020276 
020302 
020304 
020306 



020310 
020314 
020322 
020326 
020332 
020340 
020342 



020346 
020346 
020352 
020356 
020362 
020366 
020372 
020374 
020376 



020400 
020406 

020412 
020420 
020424 
020432 
020434 
020440 
020440 
020444 



004737 
000403 
104000 
0001 37 



004737 
00040^ 
104000 
0001 37 



012702 
000405 
004737 
004737 
000240 

016003 
032703 
001421 
005302 
001364 



010337 
042737 
005037 
010037 
062737 
104040 
000137 



012702 
004737 
004737 
016003 
032703 
001022 
005302 
001365 



012737 
010337 

042737 
010037 
062737 
104035 
000137 

004737 
004737 



02341? 
021054 
023574 
021054 

000002 

021166 
021060 



OC0024 
002000 



001142 
175777 
001140 
001136 
000024 

021054 



000011 
021166 
021060 
000024 
002000 



002000 
001142 

175777 
001136 
000024 

021054 

T2M66 
P *S74 



50$: 



JSR 
BR 
EMT 
JMP 



JSR 
BR 
EMT 
JMP 



PC. SERFS 
50$ 

190$ 



PC.CLKSNC 
55$ 



;SFT "LOOKING FOR SYNC" USING SUBROUTINE 
; BRANCH TO 50$ If NO ERROR 



; CLOCK THE SYNC PATTERN USING SUBROUTINE 
;8R TO 55$ IF NO ERROR 



190$ 



.•HEADER COMPARE IS INHIBITED FOR THIS TEST 
.•"LOOKING FOR SYNC" SHOULD GO OFF WITHIN ONE CYCLE 



55$: 
60$: 

70$: 



MOV #2,R2 

BR 70$ 

JSR PC. 350$ 

JSR PC. 300$ 
NOP 

MOV RMMR1(R0),R3 

BIT #PLFS,R3 

BEO 80$ 

DEC R2 

BNE 60$ 



.•ALLOW 2 PASSES THRU LOOP 

; RESET PROM STROBE 
;SET PROM STROBE 



; STORE RMMR1 AT R3 

; BRANCH IF LOOKING FOR SYNC OFF 



001142 
001 1 36 



; ERROR-LOOKING FOR SYNC DID NOT RESET DURING HEADER 

MOV R3,$BDDAT .SETUP ERROR MESSAGE 

BIC #*CPLFS.$BDDAT 

CLR $GDDAT 

MOV R0,$8DADR 

ADD #RMMR1 ,$80 ADR 

EMT 40 

JMP 190$ 

.•LOOKING FOR SYNC SHOULD COME ON FOR DATA AREA WITHIN 9 PROM CYCLES 
80$: 



MOV #9..R2 

85$: JSR PC. 350$ 

JSR PC. 300$ 

MOV RMMR1(R0),R3 

BIT #PLFS.R3 

BNE 90$ 

DEC R2 

BNE 85$ 



SET STROBE OFF 
SET PROM STROBE 
STORE RMMR1 AT RZ 

BRANCH IF SYNC ENABLED 



001140 

001142 
001136 



.-ERROR-CAN' T LOOKING FOR SYNC DURING DATA AREA 

MOV *PLFS.$GDDAT 

MOV R3,$8DDAT 

BIC #*CPLFS,$BDDAT 

MOV RO , $BDADR 

ADD #RMMR1 ,$BDADR 

EMT 35 

JMP 190$ 

JSR PC. 350$ 

JSR PC.CLKSNC 



90$: 



.•RESET PROM STROBE 

.•CLOCK THE SYNC PATTERN USING SUBROUTINE 
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1879 
1880 
1881 
1882 
1883 
1884 
1885 

1886 
1837 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 

1903 

1904 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

1914 

1915 

1916 

1917 

1918 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 



020450 
020452 
020454 



020456 
020456 
020462 
020466 
020466 
020474 
020502 
020504 
020506 
020510 



020512 
020520 
C20526 
020532 
020536 
020542 
020544 
020546 
020550 
020554 
020554 
020560 
020564 
020570 
020574 
020600 
020602 
020604 
020610 
020614 



000402 
104000 
000577 



012702 
012703 

012760 
012760 
005303 
001370 
005302 
001364 



012737 
012737 
012702 
012703 
012704 
000241 
006012 
103002 
052704 

010460 
052704 
010460 
042704 
010460 
005303 
001355 
062702 
022702 
001746 



177446 
015457 
0C1 1 74 
000020 
051401 



002000 

000024 
004000 
000024 
004000 
000024 



000002 
001 1 76 



020616 012702 000005 



SEO 00" I 



BR 100$ 
EMT 

BR 190$ 



000400 
000020 

057401 000024 
053401 000024 



.•SIMULATE READ 
100$: 



110$: 
115$: 



020622 
020626 
020632 
020636 
020642 
020644 
020646 
020650 
020654 
020660 
020664 
020670 
020676 
020700 
020702 
020702 



004737 
004737 
016003 
032703 
001417 
005302 
001365 
042703 
010337 
005037 
010037 
062737 
104063 
000465 



021060 
021166 
000024 
000400 



177377 
001142 
001140 
001136 
000024 



001174 
001176 



MOV 
MOV 

MOV 
MOV 
DEC 
BNE 
DEC 
BNE 



.•SIMULATE ECC 
MOV 



DATA 

#256.. R2 
#16.. R3 



;BR TO 100$ IF NO ERROR 



; WORD COUNT 
;8IT COUNT 



m'-<1AAA!MRD!MCLK,R"MR1(R0) ; LOAD RMMR1 

#MR1AAA!MRD,RMMRKR0> ; LOAD RMMR1 

R3 

115$ 

R2 

110$ 



120$: 
125$: 



130$: 



MOV 
MOV 
MOV 
MOV 
CLC 
ROR 
BCC 
BIS 

MOV 
BIS 
MOV 
BIC 
MOV 
DEC 
BNE 
ADD 
CMP 
BEQ 



PATTERN 

#1 77446, $TMPO 

#015457,$TMP1 

#$TMP0.R2 

#16.,R3 

#MR1AAA.R4 

<R2) 
130$ 
#MRD.R4 

R4.RMMRKR0) 

#MCIK,R4 

R4,RMMRKR0> 

R4.RMMRKR0) 

R3 

125$ 

#2,R2 

#$TMP1 .R2 

120$ 



;f JRST ECC WORD 
.'SECOND ECC WORD 



LOAD RMMR1 
LOAD RMMR1 
LOAD RMMR1 
CLOCK A WORD 

CLOCK THE NEXT WORD 



.VERIFY DATA AREA AND READ GATE RESET 
MOV #5,R2 



140$: 



SET PROM STROBE 
CLEAR PROM STROBE 
STORE RMMR1 AT R3 



001136 



016003 000040 



150$: 



JSR PC, 300$ 

JSR PC. 350$ 

MOV RMMR1(R0).R3 

BIT #PDA,R3 

BEQ 150$ 

DEC R2 

BNE 140$ 

BIC # A CPDA.R3 

MOV R3.$8DDAT 

CLR $GDDAT 

MOV R0,$8DADR 

ADD #RMMR1 ,$BDADR 

EMT 63 

BR 190$ 

MOV RMMR2(RO).R3 .-STORE RMMR2 AT R3 



SETUP ERROR MESSAGE 



"932 
1933 
1934 
935 
1936 
1937 
1938 
1939 
1940 
1941 
1<542 
19s3 
1944 
1945 
1946 
1947 
1948 
1949 
1950 
1951 
'952 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
1960 
1961 
1962 

1964 
1965 
1966 
1967 
1968 
1969 
1970 
1971 

1972 
1973 
1974 
1975 
1976 
1977 
1978 
1979 
1980 
1981 
1982 
1983 
1984 
1985 
1986 
1987 



020706 
020712 
020714 
020720 
020724 
020730 
020736 
020740 



020742 
020742 
020746 
020752 
020760 
020764 
020766 
020772 
020776 
C21004 
021006 



021010 
021010 
021014 
021020 
021024 
021026 
021030 
021032 
021034 
021036 
021042 
021046 
021052 
021054 
021060 

021066 
021066 
021074 
021102 
021110 
021116 
021120 
021124 
021126 
021134 
021142 
02H46 
021154 
021156 
021160 
021162 

021164 



042703 176000 BJC # A C1 777. R3 

001413 BEQ 160$ 

010337 001142 MOV R3.$8DDAT 

005C37 001140 CLR $GDDAT 

010037 001136 MOV R0.S8DADR 

062737 000040 001136 ADD #RMMR2,$BDADR 

104053 EMT 53 

000445 BR 190$ 

;VERJFV THERE ARE NO ECC ERRORS 
160$: 

016003 000014 MOV RMER1(R0),R3 ; 

042703 077677 BJC #*C<DCK !ECH>.R3 

012737 000000 001 HO MOV #000000, $GDDAT 

023703 001140 CMP $GDDAT ,R3 

001411 BEQ 170$ 

0 1 0337 001142 MOV R3 # $8DDAT 

010037 001136 MOV R0,$8DADR 

062737 000014 001136 ADD #RMER1 ,$BDADR 

104064 EMT 64 

000422 BR 190$ 

.-VERIFY DATA BUFFER 
170$: 



: STORE RMER1 AT R3 



012702 


054636 






MOV 


#8UF0NE.R2 


;DATA WAS STORED HERE 


012703 


1 77777 






MOV 


#1 77777. R3 


.EACH WORD ALL ONES 


012704 


000400 






MOV 


#256., R4 


022203 






180$: 


CMP 


(R2)*,R3 




001003 








BNE 


185$ 




005304 








DEC 


R4 




001374 








BNE 


1P0$ 












BR 


190$ 


.-EXIT JF ALL THE LOCATIONS 


014237 


001142 




185$: 


MOV 


-(R2),$BDDAT 


.-SETUP ERROR MESSAGE 


010337 


001140 






MOV 


R3.$GDDAT 




010237 


001136 






MOV 


R2.$BDADR 




104065 








EMT 


65 




000137 


021272 




190$: 


JMP 


400$ 


.-GREAT ESCAPE 


012737 


000021 


021162 


300$: 


MOV 


#17.,3fO$ 








; CLOCK 


PROM STROBE ON 










305$: 








012760 


055401 


000024 




MOV 


#WR1AAA!MCLK.RMMR1(R0) ;LOAD RMMR1 


012760 


051401 


000024 




MOV 


#MR1AAA.RMMR1 (RO) ;LOAD RMMR1 


016037 


000024 


021164 




MOV 


RMMR1(R0).330$ 


.-STORE RMMR1 AT 330$ 


042737 


1 77737 


021164 




BIC 


#*CWC.330$ 


001020 








BNE 


310$ 


,-EXJT IF PROM STROBE ON 


005337 


021162 






DEC 


320$ 


001360 








BNE 


305$ 




013737 


021162 


001142 




MOV 


320$.$BDDAT 


.-SETUP ERROR MESSAGE 


012737 


000040 


001140 




MOV 


#WC,$GDDAT 




010037 


001136 






MOV 


R0,$BDADR 




062737 


000024 


001136 




ADD 


#RMMR1,$BDADR 




104030 








EMT 


30 




000445 








BR 


400$ 




000207 






310$: 


RTS 


PC 




000000 






320$: 


.WORD 


0 


• 


000000 






330$: 


.WORD 


0 
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^989 
1990 

1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 



021166 
021174 
021174 
021202 
021210 
021216 
021 224 
021226 
021232 
021234 
021242 
021246 
021252 
021260 
021262 
021264 
021266 
021270 
C21272 



012737 C00021 021266 



012760 
012760 
016037 
042737 
00141 7 
005337 
001 360 
013737 
005037 
010037 
062737 
104062 
000403 
000207 
000000 
000000 
000240 



055401 
051401 
000024 
177737 

021266 

021270 
001140 
001 1 36 
000024 



000024 
000024 
021270 
021270 



001142 



001136 



350$: 
35 5$: 



360$ 
370$ 
380$ 
400$ 
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SEO 0093 



MOV #17., 370$ .-CLOCK THE STROBE Off 

MOV #MR1AAA!MCLK,RMMR1 (R0> ; L OAD RWR1 

MOV #MR1AAA.RMMR1 (RO) ; LOAD RMMR 1 

MOV RMMR1(R0>.380$ .-STORE R/T1R1 AT 380$ 

BIC #*CWC.380$ 

BEQ 360$ 

DEC 370$ 

BNE 355$ 

MOV 380$.$BDDAT 

CLR $GDDAT 

MOV R0.$8DADR 

ADD #fWf>1 ,$BDADR 

PIT 62 

BR 400$ 

RTS PC 

.WORD 0 

.WORD 0 

NOP ;SJ8-TEST EXIT POINT 



CZRMOBO RM05/3/2 DSKLS 1ST 2 
END OF SUB-PASS ROUTINE 



1 
2 
3 

5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
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021274 
021276 
021300 
021 304 
021310 
021 314 

15 021316 

16 021320 

17 021324 
18 

19 
20 



000004 
000240 
013700 
062700 
010037 
005710 
001402 
000137 
012737 



001466 
000002 
001466 



005200 
001470 



SEO 0094 



.S8TTL END OF SUB-PASS ROUfJNE 

THIS IS THE END OF SUB-PASS ROUTINE. THIS ROUTINE IS USED TO 
TERMINATE THE OPERATION OF THE CURRENT DEVICE UNDER TEST AND 
SELECT THE NEXT DEVICE FOR TEST. IF THERE ARE NO MORE DEVICES 
TO TEST, EXIT IS MADE TO '$EOP' ROUTINE. OTHERWISE, RETURN 
IS MADE TO 'READY* ROUTINE. 



SEOSP: 



001466 1$: 



SCOPE 

NOP 

MOV 

ADD 

MOV 

TST 

BEO 

JMP 

MOV 



TSTQUE ,R0 
#2,R0 
RO, TSTQUE 
(RO) 
1$ 

READY 

#TSTQUE*2. TSTQUE 



; GET POINTER TO TSTQUE 
; ADJUST POINTER TO NEXT DEVICE 
; SAVE POINTER TO TSTQUE 
;ANY MORE DEVICES FOR TEST ? 
'BR I F NO 

•YES, JUMP TO 'READY' ROUTINE 

; INITIALIZE POINTER TO FIRST DEVICE IN 



;TEST QUE TABLE 



. S8TTL END Of PASS ROUTINE 



021332 
021332 
021334 
021340 
021344 
021350 
021356 
021360 
021362 
021364 
021366 
021370 
021372 
C21376 

021416 
021416 

021422 
021424 
021430 
021432 
021436 

021502 
021502 

021506 
021510 



000240 
005037 
005037 
005237 
042737 
005327 
000001 
003066 
012737 
000001 
021360 
104401 
000407 



104405 
005737 
001431 
104401 
000421 



013746 

104405 
005037 



001116 
001206 
001230 
100000 



021400 



013746 001230 



001126 
021440 

001126 
001126 



•INCREMENT THE PASS NUMBER (tPASS) 

•TYPE "END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY' 
•WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS 
•IF THERES A MONITOR GO TO IT 
•IF THERE ISN'T JUMP TO READY 



$EOP: 

NOP 
CLR 
CLR 
INC 

001230 BIC 
DEC 

SEOPCT: .WORD- 
BGT 
MOV 

SENDCT: .WORD 
SEOPCT 
TYPE 
BR 

;;65$: .ASCIZ 
64$: 

MOV 



TYPDS 

TST 

BEO 

TYPE 

BR 

.ASCIZ 



;;67$: 
66$: 



MOV 

TYPDS 
CLR 



$TSTNM 
$TIMES 
{PASS 

#1 00000. $PASS 
(PC)* 

1 

$DOAGN 

<po*.a(PC>+ 
1 



;;ZERO THE TEST NUMBER 
;;ZERO THE NUMBER OF ITERATIONS 
;; INCREMENT THE PASS NUMBER 
; .-DON'T ALLOW A NEG. NUMBER 

;;LOOP? 

• - YES 

•[•RESTORE COUNTER 



,65$ ;;TYPE ASCIZ STRING 

64$ ;;GET OVER THE ASCIZ 

<12><15>/END PASS #/ 



$PASS,-(SP) 



$ERTTL 
$GT42P 
.67$ 
66$ 



SAVE $PASS FOR T YPEOUT 
TYPE PASS NUMBER 

GO TYPE — DECIMAL ASCII WITH SIGN 
SEE IF ANY ERRORS THIS PASS 
BR IF NO ERRORS TO REPORT 
TYPE ASCIZ STRING 
GET OVER THE ASCIZ 



TOTAL ERRORS SINCE LAST REPORT / 



$ERTTL.-(SP) 



$ERTTL 



SAVE $ERTTL FOR TYPEOUT 
TOTAL NUMBER OF ERRORS 
GO TYPE— DECIMAL ASCII WITH 
CLEAR ERROR TOTAL 



SIGN 



" ZRMQBO RM05/3/2 DSKLS TST 2 
FND OF PASS ROUTINE 

021514 104401 00121 7 

021520 013700 G00042 

021524 001405 

021526 000005 

021530 004710 

021532 000240 

021534 000240 

021536 000240 
021540 

021540 000137 

021542 005200 
021544 377 377 



MACRO V04.00 4-APR-81 



SGK2P: TYPE 
SGET42: MOV 
BEQ 
RESET 
$ENDAD: JSR 
NOP 
NOP 
NOP 

SDOAGN: 

JMP 

SRTNAD: . WORD 
000 SENULL: .BYTE 
.EVEN 



E 8 

01:29:56 PAGE 14-1 

SEO 009S 

,$CRLF ;;TYPE CARRIAGE RETURN LINE F'EED 

i>C42. RO ;;GET MONITOR ADDRESS 

SDOAGN ; ; BRANCH JF NO MONITOR 

;; CLEAR THE WORLD 
PC.(RO) ;;G0 TO MONITOR 

;;SAVE ROOM 

;;FOR 

;;ACT11 

9CO* ;; RE TURN 

READY 

-1.-1.0 ;;NULL CHARACTER STRING 



17RMQB0 RM05/V2 DSKLS T ST 2 
("LOCK SUBROUTINES 



1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
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021550 
021552 
021556 
021 562 
021570 



021576 
021602 
021610 
021616 
021624 
021632 
021640 
021644 
C21646 
021652 



021654 
021654 
021662 
021666 
021674 
021702 
021710 
021716 
021 724 
021730 
021732 
021 736 



000240 
013746 
013746 
012737 
012737 



005777 
012737 
012737 
012777 
012777 
013777 
005077 
000454 
012716 
000002 



012737 
005777 
012737 
012737 
012777 
012777 
013777 
005077 
000422 
012716 
000002 



000004 
000006 
021646 
000300 



157710 
022010 
022132 
022076 
000300 
001526 
157662 

021654 



021732 
157634 
022026 
022140 
022076 
000300 
001520 
157570 

021740 



47 
48 
49 
50 
51 
52 
53 
5^ 
55 
56 



022010 
022016 
022024 



012777 
012777 
000403 



177777 
000135 



SEO 0096 



000004 
000006 



001536 
001540 
157672 
1 57666 
157664 



000004 

001536 
001540 
157614 
157610 
157572 



021740 








021740 


005037 


001536 




021744 


012737 


001520 


001516 


021752 


005037 


001 520 




021 756 


012737 


001 526 


001524 


021764 


005037 


001526 




021770 


062766 


000002 


000C04 


021 776 








021 776 


012637 


000006 




022002 


012637 


000004 




022006 


000207 







157476 
157466 



. S8TTL CLOCK SUBROUTINES 

.•ROUTINE TO SIZE FOR CLOCKS (KW11-L OR KU11-P) 



SIZCLK: 



NOP 
MOV 
MOV 
MOV 
MOV 



ERRVEC. -(SP> 
ERRVEC*2,-(SP) 
#10$. ERRVEC 
#PR6, ERRVEC +2 



;;PUSH ERRVEC ON STACK 

;;PUSH ERRVEC*2 ON STACK 
;LOAD 04 TRAP VECTORS 



;SEE IF A KW11-P CLOCK IS PRESENT - 60 TO 10$ IF NOT PRESENT 

TST a$LPCSR ; TEST FOR P CLOCK 

MOV #PCLOCK. CLOCK ;LOAD SUBROUTINE ADDRESS 

MOV #PSTOP,STOPCL ;LOAD STOP ADDRESS 

MOV #PCOUNT.a$LPVEC ;LOAD P CLOCK INTERRUPT VECTOR 

MOV #PR6.3$LPVEC*2 

MOV $LLVEC*2,3$LLVEC; CLEAR L CLOCK INTERRUPT VECTOR 

CLR a$LLVEC*2 

BR 30$ 

10$: MOV #15$, (SP) ;DUMMV RTI ADDRESS 

RTI .-RESTORE PRIORITY 

;N0 P CLOCK-SEE IF L CLOCK IS PRESENT-GO TO 20$ IF NOT PRESET 
15$: 

MOV #20$, ERRVEC ; CHANGE 04 TRAP VECTOR 

TST 3$LLCSR ;TEST FOR L CLOCK 

MOV #L CLOCK, CLOCK ;LOAD SUBROUTINE ADDRESS 

MOV #LSTOP.STOPCL ;LOAD STOP ADDRESS 

MOV #L COUNT, a$LLVEC ;LOAD L CLOCK INTERRUPT VECTOR 

MOV #PR6.3$LLVEC*2 

MOV $LPVEC*2.a$LPVEC; CLEAR P CLOCK INTERRUPT VECTOR 

CLR 3$LPVEC*2 

BR 30$ 

20$: MOV #25$. (SP) ; DUMMY RTI ADDRESS 

RTI .-RESTORE PRIORITY 

;N0 CLOCK AVAILABLE - AUGMENT RETURN ADDRESS 
25$: 

CLR CLOCK .CLEAR SUBROUTINE ADDRESS 

MOV #$LPVEC*2,$LPVEC; CLEAR P CLOCK INTERRUPT VECTOR 

CLR $LPVEC*2 

MOV #$LLVEC*2,$LLVEC;CLEAR L CLOCK INTERRUPT VECTOR 

CLR $LLVEC*2 

ADD #2.4(SP) ; CHANGE RETURN ADDRESS 



30$: 



MOV (SP)*,ERRVEC*2 
MOV (SP)*, ERRVEC 
RTS PC 



;;POP STACK INTO ERRVEC *2 
;;POP STACK INTO ERRVEC 



/ROUTINES TO START THE CLOCK (KW11-L OR KW11-P) 
PCLOCK 



MOV 
MOV 
BR 



#-1.a$LPCS8 
#135.a$LPCSR 
PLCLK 



.-LOAD COUNT SET BUFFER 
.-LOAD CONTROL REGISTER 
;G0 TO COMMON CODE 



022026 012777 000100 157466 LCLOCK: MOV 



#lOO,a$LLCSR .-LOAD CONTROL REGISTER 



TRMQBO RM05/3/2 DSKLS 1ST 2 
CLOCK SUBROUTINES 



57 








58 


022034 


005037 


001 532 


59 


022040 


104400 






022042 


012605 




60 


022044 


010537 


001530 


61 


022050 


042705 


177437 


62 


022054 


022705 


000300 


63 


022060 


101005 




64 


022062 


012746 


000240 




022066 


012746 


022074 




022072 


000002 






022074 






65 


022074 


000207 





66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 



88 



022076 
022076 
022076 
C22104 
.22106 
022114 
022122 
022124 
022130 



022132 
022136 



062737 
103003 
012737 
162737 
100002 
005037 
000002 



005077 
000402 



022140 005077 



022144 
022144 
022150 
022154 
022156 
022156 



01 3746 
012746 
000002 

000207 



177777 
000021 

001534 



157354 
157356 



001 530 
022156 
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SEO 009/ 



000021 001532 



001552 
001534 



PLCLK; 



30$: 
40$: 



CLR 

TRAP 

MOV 

MOV 

BJC 

CMP 

BHJ 

MOV 

MOV 

RTJ 

RTS 



TIME 

(SP)*.R5 

R5.$PSW 

**CPR7,R5 

#PR6.R5 

40$ 

*PR5.-<SP) 
*30$,-<SP) 



PC 



CLEAR TIMER COUNT 

; PUSH OLD PSW AND PC ON 5 TACK 

;SAVE THE PSW IN R5 

SAVE PRIORITY 

MASK X 

IS PRIORITY TOO HIGH?? 
NO' ! 

;PUT NEW PS ON STACK 
;PUT NEW PC ON STACK 
, ;POP NEW PC AND PS 



.-ROUTINES TO HANDLE CLOCK INTERRUPTS (KW11-L OR KW11-P) 



PCOUNT: 
L COUNT; 



10$: 



20$: 



ADD 
BCC 
MOV 
SUB 
BPL 
CLR 
RTI 



*17. , TIME 
10$ 

#-1,TlME 
#1 7. , WATCH 
20$ 
WATCH 



ADD 17MS TO ELAPSED i'IM£ 
BRANCH IF NO OVERFLOW 
RESTORE MAXIMUM COUNT 
DECREMENT REMAINING TIME 
BRANCH IF POSITIVE 
CLEAR REMAINING TIME 
RETURN TO USER 



.•ROUTINES TO STOP THE CLOtK <KW11-L OR KW11-P) 



PS TOP: 
LSTOP: CLR 



CLR 
BR 



PLSTP: 



10$: 



MOV 
MOV 
RTI 

RTS 



a$LPCSR 
PLSTP 

3$LLCSR 



$PSW.-(SP) 
#10$, -(SP) 



.STOP P CLOCK 

;G0 TO COMMON STOP CODE 

.-STOP L CLOCK 



;PUT NEW PS ON STACK 
.-PUT NE.V PC ON STACK 
;POP NEW PC AND PS 



CZRMQBO RM05/3/2 DSKLS TST 2 
SET VOLUME V*LlD SUBROUTINE 



2 

3 

4 

5 

6 

7 

8 

9 
10 
11 
12 

13 022160 

14 022160 004737 022404 

15 0221 64 012760 000001 

16 022172 012760 001001 

17 022200 012760 000000 

18 022206 012760 000000 

19 022214 012760 000023 

20 C22222 016037 0C0012 
?] 022230 042737 1776^7 

22 022236 001020 

23 022240 010037 001136 

24 022244 062737 000012 

25 022252 012737 000100 

26 022260 062716 000002 

27 022264 112776 000100 

28 022272 012737 000022 

29 022300 000207 
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S£0 0098 



.S8ML SET VOLUME VALID SUBROUTINE 

THIS SUBROUTINE INITIALIZES THE SUBSYSTEM AND SETS VOLUME VALID, 
RETURNING WITH THE DRIVE STILL IN DIAGNOSTIC MODE . THE SUBROUTINE 
RETURNS TO THE WORD FOLLOWING THE CALL, EXCEPT WHEN AN ERROR IS 
DETECTED. IN WHICH CASE IT RETURNS TO THE SECOND WORD FOLLOWING THE 
CALL. 



CALL: 



SETVV: 



JSR 
BR 

ERROR 



PC. SETVV 



JUMP TO SUBROUTINE 
RETURN HERE If NO ERROR 
RETURN HERE IF ERROR 





JSR 


000024 


MOV 


00002-. 


MOV 


000014 


MOV 


000042 


MOV 


000000 


MOV 


001142 


MOV 


001142 


BIC 




BNE 




MOV 


001136 


ADD 


001140 


MOV 




ADD 


000000 


M0V8 


001174 


MOV 


10$: 


RTS 



PCCNTCLR 
#DMD.RMMR1 (RO) 
*DMD!MUR,RMMR1 (RO) 
#O.RMERKRO) ;LOAD 
*0.RMER2(R0) ;LOAD 
#PACACK!GO,RMCSKR0) 
RMDS(RO) ,$BDDAT .-STORE 
#*CVV,$BDDAT 
10$ 

R0,$8DADR 
*RMDS,$BDADP 
#VV.$GDDAT 
#2.<SP> 
#100,a(SP> 
#PACACK.$TMPO 
PC .-RETURN 



;G0 CLEAR CONTROLLER 
.-LOAD RMMR1 

.-LOAD RMMR1 
RMER1 
RMER2 

.-LOAD RMCS1 
RMDS AT SBDDAT 



; BRANCH IF VOLUME VALID 
.SETUP FOR ERROR MSG 



SET 



.-MOVE RETURN ADDRESS TO ERROR 
.WRITE ERROR NUMBER 



CZRMQBO RM05/3/2 DSKLS tst 2 
SET OFFSET MODE SUBROUTINE 

1 
2 
3 
4 
5 
6 
7 
8 
9 
10 

n 

12 

13 022302 

14 022302 012760 001001 

15 022310 012760 000000 

16 022316 012760 000000 

17 022324 012760 000015 

18 022332 016037 000012 

19 022340 042737 177776 

20 C22346 001015 

21 022350 012737 000001 

22 022356 010037 001136 

23 022362 062737 000012 

24 022370 062716 000002 

25 022374 112776 000111 

26 022402 

27 022402 000207 
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000024 
000014 
000042 
000000 
001142 
001142 

001140 

001136 

000000 



SEO 0099 



,S8TTL SET OFFSET MODE SUBROUTINE 

THIS SUBROUTINE EXECUTES AN OFFSET COMMAND AND VERIFIES THAT OFFSET 
MODE SETS. THE DRIVE SHOULD BE IN DIAGNOSTIC MODE WHEN CALLING THE 
SUBROUTINE, WHICH WILL LEAVE DMD ON. THE SUBROUTINE RETURNS TO THE 
WORD FOLLOWING THE CALL UNLESS THERE IS AN ERROR, IN WHICH CASE IT 
RETURNS TO THE SECOND WORD FOLLOWING THE CALL 



CALL: 



SETOM: 



10$: 



JSR 
BR 

ERROR 



MOV 
MOV 
MOV 
MOV 
MOV 
BIC 
BNE 
MOV 
MOV 
ADD 
ADD 
M0V8 

RTS 



PC, SETOM 



JUMP TO SUBROUTINE 
RETURN HERE IF NO ERROR 
RETURN HERE IF ERROR 



tfDMD .' MUR , RMMR 1 ( RO) ;LOAD RMMR1 

*O.RMERKRO) ;LOAD RMER1 
#0.RMER2(R0) ;LOAD RMER2 
*OFFSfc*T!GO,RMCS1(R0) ;LOAD RMCS1 
RMDS(RO) ,$8DDAT .-STORE RMDS AT $6DDAT 
#*COM,$BDDAT 

10$ .-BRANCH IF OFFSET ON 

#OM.$GDDAT 
R0.S8DADR 
#RMDS,$8DADR 
*2.<SP) 
#111.a(SP) 



;MOVE RETURN 
; WRITE ERROR 



ADDRESS 
NUMBER 



TO ERROR 



PC 



.-RETURN TO USER 



CZRMQBO RM05/3'2 DSKLS T ST 2 
CLEAR CONIROLLER SUBROUTINE 



2 
3 
4 
5 
6 
7 
8 
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SEO 0100 



9 
10 
11 

1? 
3 



022404 
022404 
022406 
022412 
022420 
022426 
022430 



010046 
01 3700 
012760 
1 1 7760 
012600 
000207 



.S8TTL CLEAR CONTROLLER SUBROUTINE 

THIS SUBROUTINE CLEARS THE MASSBUS CONTROLLER, MASSBUS ADAPTERS , 

AND DRIVES. THEN SELECTS THE DRIVE. 

CALL: 

PC.CNTCLR ; CALL TO ROUTINE - 



CNTCLR: 



001276 
000040 
1 57042 



000010 
000010 



JSR 



MOV 

MOV 

MOV 

M0V8 

MOV 

RTS 



RO.-(SP) ;;PUSH RO ON STACK 

SBASE.RO ;R0 = UNI8US BASE ADDRESS 

#CLR.RMCS2(R0) .-CLEAR MASSBUS 

aTST0UE e RMCS2(R0) .'SELECT DEVICE UNDER TEST 

(SP)*,R0 ;;P0P STACK INTO RO 

PC .-RETURN 



CZRMQBO RM05/3/2 DSKLS T ST 2 
FNABLE SEARCH SUBROUTINE 



1 
2 

3 02243? 

4 

5 

6 

7 

8 

9 
10 
11 
12 
13 
14 
15 
16 
17 
18 

19 022432 004737 

20 C22436 012760 

21 022444 012704 
22 

23 022450 
022450 012760 

24 022456 012760 

25 022464 016005 

26 022470 032705 

27 022474 001023 

28 022476 005304 

29 022500 001363 

30 022502 010037 

3 1 022506 062737 

32 022514 005037 

33 022520 012737 

34 022526 062716 

35 022532 112776 

36 022540 000137 

37 022544 
022544 012760 

38 022552 012760 

39 022560 016005 

40 C22564 032705 

41 022570 001423 

42 022572 005304 

43 022574 001363 

44 022576 010037 

45 022602 062737 

46 022610 012737 

47 022616 005037 

48 022622 062716 

49 022626 112776 

50 022634 000137 
51 

52 
53 
54 

55 022640 
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r fQ 0101 



. SBTTL ENABLE SEARCH SUBROUTINE 
EN8SCH: 

THE REGISTER OUTPUT BUFFER SHOULD CONTAIN: 

RMDAO = DESIRED SECTOR AND TRACK ADDRESS 
RMDCO = DESIRED CYLINDER ADDRESS 
RMOFO = FORMAT. ECI, HCI 
RMBAO = BUFFER ADDRESS 
RMUCO = WORD COUNT 
RMCS10 = FUNCTION CODE 

.-NOTE: OFFSET IS NOT ENABLED WHEN USING THIS SUBROUTINE 



SET VOLUME VALID 
FIRST. CLEAR -SET 
PROM STROBE 



DIAGNOSTIC MODE-SYNCHRONIZE 



022404 

0C0001 000024 
000041 



005001 000024 
001001 000024 
000024 
000040 



5$: 



001136 
000024 
001142 
000040 
000002 
000030 
023302 



001136 
001140 
000000 



005001 000024 
001001 000024 
000024 
000040 



6$: 



001136 
000024 
000040 
001140 
000002 
000062 
023302 



001136 
001142 



000000 



JSR 
MOV 
MOV 



MOV 

MOV 

MOV 

BIT 

BNE 

DEC 

BNE 

MOV 

ADD 

CLR 

MOV 

ADD 

M0V8 

JMP 

MOV 

MOV 

MOV 

BIT 

8EQ 

DEC 

BNE 

MOV 

ADD 

MOV 

CLR 

ADD 

M0V8 

JMP 



PC.CNTCLR 
*DMD.RMMR1(R0) 
#33.. R4 



GO CLEAR CONTROLLER 
LOAD RMMR1 

ALLOW UP TO 33 BIT CLOCKS 
TO SYNC PROM STROBE 



*DMD!MUR!MCLK.RMMR1 (RO) ;LOAD RMMR1 

#DMD ! MUR . RMMR1 ( RO ) ;LOAD RMMR1 

RMMR1(R0),R5 ."STORE RMMR1 AT R5 

#WC,R5 ;WAIT FOR PROM STROBE TO COME ON 

6$ 

R4 

5$ 

RO , SBDADR ;PROM STROBE WONT SET 

#RMMR1 .SBDADR 

S8DDAT 

JWC.SGDDAT 

#2,(SP) 

#30.a<SP> 

60$ .-REPORT ERROR 

#DMD.'MUR!MCLK.RMMR1 (RO) ;LOAD RMMR1 
#DMD!MUR.RMMR1(R0) ; LOAD RMMR1 

RMMR1 (R0).R5 .-STORE RMMR1 AT R5 
#WC,R5 .-WAIT FOR PROM STROBE TO GO OFF 

7$ 
R4 
6$ 

RO. SBDADR 
0RMMR1 , SBDADR 
*WC,$BDDAT 
SGDDAT 
#2.(SP> 

#62.a<sp> 

60S 



;PROM STROBE WONT RESET 



SECOND, CLOCK INDEX PULSE 
(1) CLEAR FORMAT CHANGE 
, (2) CLEAR RTC FLOP 



TO 

FLOP 



CZRMQBO RM05/3/2 DSKLS TST 2 
ENABLE SEARCH SUBROUTINE 
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SEQ 010, 



56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

o7 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

8/ 

88 

89 

90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
100 
101 
102 

103 
104 
105 
106 

107 
108 



022640 
022646 

022654 
022662 
022670 
022676 
022704 
022712 
022714 
022720 
02272t 
022734 
022740 
022746 
022754 



022756 
C22756 
022764 
022772 
023000 
023006 



023014 
023022 
023030 
023036 



023044 
023052 
023056 
023056 
023064 
023072 
023074 
023100 
023102 
023106 
023114 
023120 
023126 
023132 

023140 
023142 
023142 



023146 
023152 
023152 
023160 
023166 



012760 
012760 

012760 
012760 
012760 
016037 
042737 
001021 
010037 
062737 
012737 
062716 
112776 
012737 
000552 



013760 
013760 
01 3760 
01 3760 
013760 



012760 
012760 
012760 
013760 



012737 
004777 

016037 
042737 
001023 
005737 
001366 
00^777 
012737 
010037 
062737 
062716 
112776 

000460 

00W77 



001005 
001001 

000000 
000000 
000023 
000012 
1 77677 

001136 
000012 
000100 
000002 
000100 
000022 



001 420 
001446 
001444 
001414 
001416 



041401 
000000 
000000 
001412 



000310 
156460 

000024 
137777 

001534 

156432 
040000 
001136 
000024 
000002 
000101 



156372 



012704 000021 



000024 
000024 

000014 
000042 
000000 
001142 
001142 



001136 
001 HO 

000000 
001174 



000006 
000034 
000032 
000002 
000004 



000024 
000014 
000042 
000000 



001534 



001142 
001142 



001140 
001136 
000000 



MOV 
MOV 

MOV 
MOV 
MOV 
MOV 
8JC 
BNE 
MOV 
ADD 
MOV 
ADD 
M0V8 
MOV 
BR 

.-LOAD REGISTERS 
10$: 

MOV 
MOV 
MOV 
MOV 
MOV 



#DMD.MUR.MI.RMMR1(R0) 
#DMD.MUR,RMMR1 (RO) 



;LOAD RMMR1 
; L OAD RMMR1 



fO.RMERKRO) .'LOAD RMFR1 
#0.RMER2(R0) .'LOAD RMER2 
#PACACK.GO.RMCSKR0) ;LOAD RMCS1 
RMDS(RO) ,$8DDAT ; STORE RMDS AT S8DDAT 



#*CVV,$BDDAT 
10$ 

R0,$8DADR 

#RMDS,$BDADR 

#VV.$GDDAT 

#2.(SP) 

#lOO.i(SP) 

#PACACK,$TMPO 

60$ 



RMDAO.RMDA(RO) 
RMDCO.RMDC(RO) 
RMOFO.R'OFCRO) 
RMWCO,RMWC<RO) 
RMBAO.RMBA(RO) 



; VOLUME VALID SHOULD BE Sf T 
.-SETUP ERROR MSG 



.WRITE ERROR NUMBER 



LOAD RMDA 
LOAD RMDC 
LOAD RMOf 
LOAD RMWC 
LOAD RM8A 



.•ENABLE DEBUG CLOCK AND LOAD FUNCTION CODE 



MOV #DMD .' MUR IDBEN! MOC. RMMR 1(R0> 

MOV #0,RM£RKRO> ;LOAD RMER1 

MOV #0.RMER2(R0) ;LOAD RMER2 

MOV RMCS10,RMCS1(RO> .'LOAD RMCS1 



.LOAD RMMR1 



.-WAIT FOR "RUN AND GO" TO SET 



20$: 



30$: 



MOV #200.. WATCH 

JSR PC.aCLOCK 

MOV RMMR1 <R0) .$8DDAT 

BIC #*CRG.$BDDAT 

BNE 30$ 

TST WATCH 

BNE 20$ 

JSR PC.iSTOPCL 

MOV *RG.$GDDAT 

MOV RO.$BDADR 

ADD #RMMR1 ,$BDADR 

ADD #2.(SP) 

M0V8 #101,i(SP) 

BR 60$ 

JSR PC.3ST0PCL 



;SET WATCHDOG TIMER VALUE 
; START THE CLOCK 

.STORE RMMR1 AT $8DDAT 



ANY TIME LEFT? 
VES-WAIT 
STOP THE CLOCK 
SETUP ERROR MSG 



; WRITE ERRC • NUMBER IN 
;USEn*S CALL - 



.STOP THE CLOCK 



012760 
012760 
005304 



141401 
041401 



000024 
000024 



.-STEP COMMAND SEQUENCER TO HEAD SEQUENCE AT LOCATION 156 (17 CLOCKS) 
MOV #17. .R4 ;R4=CL0CK COUNT 

40$: 

MOV #DMD ! MUR . DBEN ! MOC ! DBCK . RMMR 1 (RC > ;LOAD RMMR1 

MOV *DMD! MUR. DBEN MOC .RMMR 1 (RO) ; LOAD RMMR 1 
DEC R4 
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SEQ 0103 



109 
HO 
111 
112 
113 
IK 
115 
116 
117 
118 
119 
120 
121 
122 



023170 001370 



023172 
023200 



023206 
023212 
023212 
023220 
023226 
023230 

123 023232 

124 023240 
023246 
023250 
023254 
C23262 
023270 
023274 
023302 
023302 



125 
126 
127 
128 
129 
130 
131 
132 



BNE 



40$ 



; DROP 
; TEST 



01 ?7/\0 


0^1 001 


0000?£ 




MOV 


\J \ Cf Ov 


n^i z.0i 


O00OP4 




MOV 








• STEP 


SEQUENCER 




00004 3 






MOV 








50$- 




01 ?7(\Ci 


1 S1401 


000024 




MOV 


01 ?7*0 




0000P4 




MOV 


005304 








DEC 


001370 








BNE 


016037 


000024 


001142 




MOV 


042737 


173777 


001142 




BIC 


001015 








BNE 


010037 


001136 






MOV 


062737 


000024 


001136 




ADD 


012737 


0C4000 


001K0 




MOV 


062716 


000002 






ADD 


112776 


000102 


000000 




M0VB 








60$: 




000207 








RTS 



ON CYLINDER TO RESET LATCH. THEN SET ON CYLINDER TO PASS 
AT LOCATION 166 

#DMD.MUR!DBEN,RMMR1(R0) ;L0AD RMMR1 
*DMD.MUR!D8EN!M0C,RMMR1 (RO) ; L OAD RMMR1 

SEQUENCER (35 CLOCKS) AND VERIFY SEARCH IS ENABLED 
#35., R4 ;R4=CL0CK COUNT 

#DMD!MUR!DBEN.M0C!D8CK!MSEN,RMMR1 (RO) ;L0AD RMMR1 
#DMD!MUR!DBEN!M0C!MSEN,RMMR1 (RO) ;L0AD RMMR1 

R4 
50$ 

RMMR1 (R0),$8DDAT ;ST0RE RMMR1 AT $8DDAT 

#*CESRC ,$8DDAT .-SEARCH SHOULD BE ENABLED 
60$ 

R0.$8DADR ; SETUP ERROR MESSAGE 

*RMMR1.$BDADR 
#ESRC,$GDDAT 

*2.(SP) .-WRITE ERROR NUMBER 

#102.a(SP) 

PC 
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4 
5 
6 

7 023304 

8 

9 

10 023304 
023312 
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11 

12 
13 

14 023320 
023326 

15 023332 

16 023336 

17 023340 
18 

19 
20 

21 023344 

22 023352 
23 

24 

25 023360 

26 023366 

27 023374 

28 023402 
29 

30 023410 



012760 
012760 



012737 
004777 
005737 
001375 
004777 



012760 
012760 



012760 
012760 
012760 
012760 

000207 



051405 
051401 



000006 
1 56204 
001534 

156174 



051441 
051401 



051403 
051443 
051403 
051401 



SEO 0104 



000024 
000024 



001534 



000024 
000024 



000024 
000024 
000024 
000024 



. S8TTL SECTOR COMPARE SUBROUTINE 

THIS SUBROUTINE CONTINUES THE EXECUTION OF A DATA COMMAND 
FROM WHERE SEARCH HAS BEEN ENABLED TO WHERE SECTOR COMPAPE 
IS SET. 

SCTCMP: 

;SET INDEX PULSE TO CLEAR FORMAT CHANGE FLOP 

MOV *DW.'MUR!DBEN!M0C!MSEN!MI,RMMR1(R0) ;LOAD RMMR1 
MOV *DMD. MUR! DBEN! MOC! MSEN, RMMR1 (RO) ;LOAD RMMR1 



.-WAIT AT LEAST 
MOV 



10$: 



JSR 
TST 
BNE 
JSR 



;DATA INPUT 
;SET FLOP 

MOV 
MOV 



4 MS FOR "RETURN TO CENTER LINE" ONE SHOT TO SET 

#6. WATCH ;SET WATCHDOG TJrfER VALUE 

PC.aCLOCK ; START THE CLOCK 
WATCH 
10$ 

PC.aSTOPCL ;STOP THE CLOCK 

TO SEARCH ENABLE FLOP SHOULD BE ONE - CLOCK SECTOR PULSE TO 

0DMD ! MUR ! DBEN! MOC ! MSEN IMS, RMMR1 (RO) ;LOAD RMMR1 
*DMD!MUR!DBEN!MOC!MSEN.RMMR1(R0) ;LOAD RMMR1 



;WITH SECTOR COMPARE HIGH. CLOCK SECTOR PULSE TO SET SECTOR COMPARE FLOP 



MOV 
MOV 
MOV 
MOV 

RTS 



*DMD J MUR ! DBEN ! MOC ! MSEN ! MSC , RMMR1 (RO) 
*DMD ! MUR ! DBEN !MOC ! MSEN !MSC ! MS , RMMR1 (RO) 
*DMD ! MUR 'DBEN! MOC ! MSEN !MSC .RMMR1 (RO) 
*DMD 1 MUR . DBEN ! MOC ! MSEN .RMMRl ( RO) 

PC 



LOAD RMMR1 
LOAD RMMRl 
LOAD RMMR1 
LOAD RMMR1 



(£3412 
023412 
023420 
023426 
023432 
023436 



2 
3 
4 
5 

6 023412 

7 

8 

9 
10 
11 
12 
13 
14 
15 
16 

17 023440 
023444 
023444 
C23452 
023460 
023464 
023470 
023472 
023474 
023476 
023502 
023510 



18 



19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
3l 
32 
33 
34 
35 
36 



023512 
023512 
023516 
023522 
023524 
023532 

37 023540 

38 023542 
023542 
023546 
023552 
023554 
023562 
023570 
023572 
023572 



39 
40 
41 
42 
43 
44 
45 



012760 
012760 
016005 
032705 
001 765 



055401 
051401 
000024 
000040 



012704 000260 



012760 
012760 
016005 
032705 
001010 
005304 
C01 363 
062716 
112776 
000430 



016005 
032705 
001007 
012760 
012760 
0OC414 

016005 
032705 
001407 
012760 
012760 
000764 

000207 



055401 
051401 
000024 
002000 



000002 
000035 



000024 
000040 

C55401 
051401 



000024 
000040 

055401 
05K01 



000024 
000024 



000024 
000024 



000000 



000024 
000024 



000024 
000024 



. SBTTl SET LOOKING FOR SVNC SUBROUTINE 

;THIS SUBROUTINE WI.L SETUP THE DATA TIMING SEQUENCER 
.•ASSUMING SEARCH IS ENABLED, TO THE POINT WHERE ' T>LF S" IS ACTIVE 

SETLFS: 

;PULSt" BIT CLOCK UNTIL PROM STROBE SETS 
10$: 

MOV #DMD!MUR!D8EN.MOC.MSEN!MCIK,RMMRKRO> ;LOAD RMMP1 
MOV #DMD.MUR!D8EN!M0C!MSEN,RMMR1(R0) ;LOAD RMMR1 

MOV RMMR1 (RO) ,R5 ; STORE RMMR1 AT R5 
BIT #WC.R5 
BEQ 10S 

;SET UP DATA bEQUENCER TO LOCATION 11. WHERE PLFS WILL SET 



20$: 



MOV 

MOV 

MOV 

MOV 

BIT 

BNE 

DEC 

BNE 

ADD 

M0V3 

BR 



#176. ,R4 



.MAX NUMBER OF BIT CLOCK 



#DMD!MUR!DBEN!MOC!MSEN!MCLK,RMMR1(R0> ;L0AD RMMR1 
fDMD.'MURIDBEN.'MOC .'MSEN.RMMR1 (RO) ;LOAO RMMR1 

RMMR1(R0>,R5 ; STORE RMMR1 AT R5 

.-EXIT If PLFS IS SET 



*PLFS.R5 
30$ 
R4 
20$ 

#2,(SP) 

#35.a(SP> 

50$ 



.ERROR IF COUNT EXHAUSTED 
;CANT SET PLFS 



;STEP THE MAIN REG CLOCK UNTIL THE TRAILING EDGE OF PROM ST0R8E 
;IS DETECTED. 



30$: 



40$: 



50$: 



MOV 
BIT 
BNE 
MOV 
MOV 
BR 

MOV 
BIT 
BEO 
MOV 
MOV 
8R 

RTS 



RMMR1 (R0).R5 
JTWC.R5 
40$ 

*MR1AAA!MCLK.RMMR1 (RO) 
#MR1 AAA.RMMRl (RO) 
50$ 



.'STORE RMMR1 AT R5 



.-LOAD RMMR1 
.•LOAD RMMR1 



RMMR1 (RO) .R5 ; STORE RMMR1 AT R5 

#WC.R5 

50$ 

#MR1AAA!MCLK.RMMRKR0) ;LOAD RMMR1 
#MR1AAA,RMMR 1 (RO) ;LOAD RMMR1 

40$ 



PC 



.-EXIT 
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1 
2 
3 
4 
5 

6 0235 74 
7 
8 
9 



023574 

10 023600 

11 023604 

12 023606 

13 023612 

14 023620 

15 023626 

16 023632 

17 023640 

18 023644 
'9 023652 

20 C23654 

21 023660 

22 02366'. 

23 023666 

24 023674 

25 023702 

26 023706 

27 023710 
28 

29 

30 023712 

31 023716 

32 023724 

33 023730 

34 023734 

35 023742 

36 023746 

37 023754 
38 

39 

40 023756 

41 023756 

42 023762 

43 023770 

44 023774 

45 023776 

46 024000 

47 024002 
48 

49 024006 
024006 

50 024012 

51 024016 

52 024022 

53 024026 

54 024032 

55 024036 
56 



016004 
032704 
001023 
010437 
042737 
012737 
010037 
062737 
062716 
112776 
000472 
012705 
032704 
001434 
012760 
012760 
016004 
005305 
001363 



010437 
042737 
005037 
010037 
062737 
062716 
112776 
000431 



012704 
012737 
012705 
000241 
006004 
103002 
052705 



010560 
052705 
010560 
C42705 
010560 
005337 
001354 



000024 
002000 

001142 
175777 
002000 
001136 
000024 
000002 
000035 

0C0021 
000040 

055401 
051401 
000024 



001142 
177737 
001140 
001136 
000024 
000002 
000062 



014400 
000020 
051401 



002000 



000024 
004000 
000024 
004000 
000024 
024042 
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•S8TTL CLOCK SYNC SUBROUTINE 

.-THIS SUBROUTINE WILL SIMULATE THE HEADER AND DATA SYNC 
.•PATTERN BEING READ 



SEO 0106 



001142 
001140 

001136 

000000 



000024 
000024 



CLKSNC: 

.•VERIFY THAT 
MOV 
BIT 
BNE 
MOV 
BIC 
MOV 
MOV 
ADD 
ADD 
M0V8 
FJR 

10$: MOV 
20$: BIT 
BEQ 
MOV 
MOV 
MOV 
DEC 
BNE 



"PLFS" IS ON 
RMMR1(R0).R4 
#Pcf S.R4 
10$ 

R4.$8DDAT 
# A CPLFS.$BDDAT 
#PLFS,$GDDAT 
RO,$BDAl>R 
#RMMR1.$BDADR 
#2.(SP) 
#35.a(SP) 
60$ 

#17..R5 
#WC.R4 
30$ 

#MR1AAA!MCLK,RMMR1 (RO) 
#MR1AAA,RMMR1 (RO) 



STORE RMMR1 AT R4 
LOOK FOR SYN SET ? 
BRANCH IF SO 



RMMR1(R0),R4 
R5 
20$ 



.•MAKE SURE PROM STROBE IS OFF 



:LOAD RMMR1 
.-LOAD RMMR1 



.-STORE RMMR1 AT R4 



001142 

001136 
000000 



024042 



.•ERROR CAN'T RESET PROM STROBE WITH LFS ACTIVE 

MOV R4.$BDDAT .-SETUP ERROR FOR USER 

BIC # A CWC.$BDDAT 

CLR $GDOAT f 

MOV R0,$8DADR 

ADD #RMMR1 ,$BDADR 

ADD #2 f (SP> 

MOVB #62.»(SP) 

BR 60$ 

: CLOCK THE SYNC PATTERN (00011001) THROUGH THE SHIFT REGISTER 
30$: 



40$: 



50$: 



MOV #014400. R4 

MOV #16.. 70$ 

MOV #MR1AAA.R5 

CLC 

ROR R4 

BCC 50$ 

BIS #MRD.R5 



MOV R5.RMMRKR0) 

BIS #MCLK,R5 

MOV R5.RMMRKR0) 

BIC #MCLK.R5 

MOV R5.RMMR1 (RO) 

DEC 70$ 

BNE 40$ 



;STR08E BIT COUNT 

.•GENERATE REG VALUE 

;WITH MAINTENANCE CLOCK ON 



; SET READ BIT PER PATTERN BIT 

LOAD RMMR1 

LOAD RMMR1 

.•CLOCK ONE BIT 
LOAD RMMR1 
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CLOCK SYNC SUBROUTINE 



CAN'T VERIFY SYNC CLOCK WAS DETECTED 

8It\l C 0^k°A^D^ERIFY E PRO« STROBE SETS WITHIN ONE WORD TIME 



57 
58 

60 02OX0 60S- 
fci 02<.W0 000207 RTS PC 

t\02<.(*2 000000 7 0S: .WORD 0 ;TEW>ORARV STORAGE 



L 
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.S8TTL SAVE AND RESTORE R0-R5 ROUTINES 



SEU 0106 



024044 
024044 
C24046 
024050 
024052 
024054 
024056 
024060 
024064 
024070 
024074 
024100 



024102 
024102 
024106 
024112 
024116 
0?41 22 
024124 
024126 
C24130 
024132 
024134 
024136 



010046 
010146 
010246 
010346 
010446 
010546 

016646 000022 
016646 000022 
016646 000022 
016646 000022 
000002 



012666 000022 
12666 000022 



12666 000022 
012666 000022 
■012605 
01 2604 
012603 
012602 
012601 
012600 
000002 



SAVE R0-R5 
CALL : 

SAVREG 

UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE 



TOP (*16) 

♦2 (*18) 

♦4 R5 

♦6 R4 

+8 R3 

+ 10 R2 

♦ 12 R1 

♦ 14 RO 



$SAVREG: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 

•RESTORE R0-R5 



RO.-(SP) 

R1.-(SP) 

R2.-(SP) 

R3.-(SP) 

R4.-(SP) 

R5.-(SP) 

22(SP).-(SP> 

22<SP).-(SP> 

22(SP).-(SP) 

22<SP),-(SP> 



•CALL 



SRESREG: 



RESREG 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 



PUSH 
PUSH 
PUSH 
PUSH 
PUSH 
PUSH 
SAVE 
SAVE 
SAVE 
SAVE 



RO ON 
R1 ON 
R2 ON 
R3 ON 
R4 ON 
R5 ON 
PS OF 
PC OF 
PS OF 
PC OF 



STACK 

STACK 

STACK 

STACK 

STACK 

STACK 

MAIN FLOW 

MAIN FLOW 

CALL 

CALL 



<SP>*.22<SP) 

(SP)+.22(SP) 

(SP)*.22(SP) 

<SP^.22(SP> 

<SP)*.R5 

<SP)*.R4 

<SP)+.R3 

<SP)+,R2 

(SP)*.R1 

<SP)*.RO 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOW 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO R1 
D 0P STACK IN T 0 RO 
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. SBTTL BINARY TO ASCII AND 1YPE ROUTINE 



•THIS ROUTINE IS USED TO CHANGE A 16-BIT 8 I NARY NUMBER TO A 16-BIT 

•BINARY-ASCII NUMBER AND TYPE IT. 

•CALL: 

NUMBER TO BE TYPED 



MOV 
TYP8N 



NUMBER. -(SP) 



024140 


010146 






STYPBN: 


MOV 


RI.-(SP) 
6(SP).R1 


024 U2 


016601 


000006 






MOV 


024146 


000261 








SEC 




024150 


112737 


000060 


024212 


1$: 


M0V8 


fO.SBIN 


024156 


006101 








ROL 


R1 


024160 


001406 








BEG 


2$ 


024162 


105537 


024212 






ADC8 


$BIN 


024166 


104401 


024212 






TYPE 


.S8JN 


024172 


000241 








CLC 




024174 


000765 








BR 


1$ 


024 176 


012601 






2$: 


MOV 


(SP)*.R1 


024200 


016666 


000002 


000004 




MOV 


2(SP).4(SP) 


024206 


012616 








MOV 


(SP)*.(SP) 


024210 


000002 








RTI 




0242^2 


000 


000 




$8JN: 


.BYTE 


0.0 



TYPE IT 

SAVE R1 ON THE STACK 
GET THE INPUT NUMBER 
SET "C" SO CAN KEEP TRACK OF THE 
SET CHARACTER TO AN ASCII "0". 
GET THIS BIT 
DONE? 

NO— SET THE CHARACTER EOUAL TO THIS BIT 
GO TYPE THIS BIT 

CLEAR "C" SO CAN KEEP TRACK OF BITS 
GO DO THE NEXT BIT 
POP THE STACK INTO R1 
ADJUST THE STACK 

RETURN TO USER 

STORAGE FOR ASCII CHAR. AND TERMINATOR 



NUMBER Of BITS 
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.SBTTL CONVERT BINARY TO DECIMAL AND TYPF ROUTINE 



024214 
024214 
024216 
024220 
024222 
024224 
024226 
C24232 
024236 
024240 
024242 
024250 
024252 
024256 
024262 
024264 
024270 
024272 
024274 
024276 
024300 
024302 
024304 
024306 
024310 
024312 
024314 
024316 
024324 
C24330 
024334 
024336 
024340 
024344 
024346 
024350 
024352 
024354 
024356 
024360 
024366 
024370 
02^72 
02W<. 
C24 376 



010046 
010146 
010246 
010346 
010546 
012746 
016605 
100004 
005405 
112/66 
005000 
012703 
112/23 
005002 
016001 
160105 
002402 
005202 
000774 
060105 
005702 
001002 
105716 
100407 
106316 
103003 
116663 
052702 
052702 
110223 
005720 
020027 
002746 
003002 
010502 
000764 
105726 
100003 
116663 
105013 
012605 
012603 
012602 
012601 



020200 
0C0020 



000055 000001 



024430 
000040 

024420 



•THIS ROUTINE IS USED TO CHANGE A 16-81 T BINARY NUMBER TO A 5-DJGH 
•SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
•NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
•BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING 7ER0S WILL ALWAYS BE 
•REPLACED WITH SPACES. 



•CALL: 



STYPDS: 



000001 
000060 
000040 



000010 



177777 



1$: 



2$: 
3$: 



4$: 



5$: 



6$: 
7$: 



177777 '77776 



8$: 



9$: 



MOV NUM.-(SP) 
TYPDS 



MOV RO.-(SP) 

MOV RI.-(SP) 

MOV R2.-<SP) 

MOV R3,-(SP> 

MOV R5,-(SP> 

MOV #20200. -(SP) 

MOV 20<SP),R5 

BPL 1$ 

MEG R5 

MOVB #'-.1(SP) 

CLR RO 

MOV #$DBLK,R3 

MOVB »' ,<R3)* 

CLR R2 

MOV $DTBL(R0).R1 

SUB R1.R5 

BLT 4$ 

INC R2 

BR 3$ 

ADD R1.R5 

TST R2 

BNE 5J 

TST8 (SP) 

BMI 7$ 

ASLB (SP) 

BCC 6S 

MOVB 1(SP),-KR3) 

BIS »'0.R2 

BIS *' ,R2 

MOVB R2,(R3>+ 

TST (RO)* 

CMP R0.#10 

BLT 2$ 

BGT 8$ 

MOV R5. R2 

BR 6$ 

TSTB (SP)* 

BPL 9$ 

MOVB -1(SP),-2(R3) 

CLRB (R3) 

MOV (SP)*.R5 

MOV (SP)*.R? 

MOV (SP)*.R2 

MOV (SP)*.R1 



;;PUT THt BINARY NUMBEP ON THE STACK 
;;G0 TO THE ROUTINE 



PUSH RO ON STACK 

PUSH R1 ON STACK 

PUSH R2 ON STACK 

PUSH R3 ON STACK 

PUSH R5 ON STACK 

SET BLANK SWITCH AND SIGN 

GET THE INPUT NUMBER 

BR IF INPUT IS POS. ; 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEG. 

ZERO THE CONSTANT* INDEX 

SETUP THE OUTPUT POINTER 

SET THE FIRST CHARACTER TO A BLANr 

CLEAR THE BCD NUMBER 

GET THE CONSTANT 

FORM THIS BCD DIGIT 

BR IF DONE 

INCREASE THE BCD DIGIT BY 1 



ADD BACK THE CONSTANT 

CHECK IF BCD DIGIT=0 

FALL THROUGH IF 0 

STILL DOING LEADING O'S? 

BR IF YES 

MSD? 

BR IF NO 

YES— SET THE SIGN 

MAKE THE BCD DIGIT ASCII 

MAKE IT A SPACE IF NOT ALREADY A DIGIT 

PUT THIS CHARACTER IN THE OUTPUT BUFFER 

JUST INCREMENTING 

CHECK THE TABLE INDEX 

GO DO THE NEXT DIGIT 

GO TO EXIT 

GET THE LSD 

GO CHANGE TO ASCII 

WAS THE LSD THE FIRST NON-ZERO? 

BR IF NO 

YES— SET THE SIGN FOR TYPING 

SET THE TERMINATOR 

POP STACK INTO R5 

POP STACK INTO R3 

POP STACK INTO R2 

POP STACK INTO R1 



r 7»MQB0 RM05/V2 DSKlS T ST ? MACRO V04.00 
TNvERT BINARY TO DECIMAL AND TYPE ROUTINE 

024400 012600 MOV 
024402 104401 C24450 TYPE 

024406 016666 C00002 00000^ MOV 
024414 012616 MOV 
024416 000002 *JI . 

024420 023420 $D SL : 0000. 

024422 001750 000. 
02^.424 000144 100. 
024426 000012 10. 
02443C SD8L*: .8LKW 
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(SPW.RO 
(SP>«.(SP> 



SEQ 0111 



;;POP STACK INTO RO 
;;NOW TYPE ThF NUMBER 
; ; ADJUST THE S'ACK 

RE TURN TO USER 
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BINARY TO OCTAL (ASCII) AND TYPE SEO 0112 

.S8TTL BINARY TO OCTAL (ASCII) AND TYPE 

JiTHlS ROUTINE IS USED TO CHANGE A 16-81 T BINARY NUMBER TO A 6-DIGIT 
.'♦OCTAL (ASCII) NUMBER AND TYPE IT. 

;»STYPOS ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 

;*CALL: 

;* MOV NUM.-(SP) ;; NUMBER TO BE TYPED 

;» TYPOS ;;CALL FOR TYPE OUT 

.BYTE N ;:N=1 TO 6 FOR NUMBER OF DIGITS TO TVPE 

;* .BYTE M ;;M=1 OR 0 

;;1=TYPE LEADING ZEROS 
;* ;;0=SUPPRESS LEADING ZEROS 

• » 

)»$TYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

;»$TYP0S OR STYPOC 
.-•CALL: 











* 


MOV 


NUM.-(SP) 


.'NUMBER TO BE TYPED 










• » 


7YP0N 




;CALL FOR TYPEOUT 










*$TYPOC ENTER HERE FOR TYPEOUT 


OF A 16 BIT NUMBER 










••CALL: 
















• * 


MOV 


NUM.-(SP) 


.•NUMBER TO BE TYPED 










• * 


TYPOC 




.-CALL FOR TYPEOUT 


024440 


01 7646 


000000 


J TYPOS: 


MOV 


3(SP),-(SP) 


.-PICKUP THE MODE 


024444 


116637 


000001 


024663 




M0V8 


1<SP).S0FILL 


.-LOAD ZERO FILL SWITCH 


024452 


112637 


024665 






M0V8 


(SP)+,$0M0DE*1 : 


.•NUMBER OF DIGITS TO TYPE 


024456 


062716 


000002 






ADD 


#2,(SP) 


.•ADJUST RETURN ADDRESS 


024462 


000406 








BR 


STYPON 




024464 


112737 


000001 


024663 STYPOC: 


M0V8 


#1,S0FILL 


;SET THE ZERO FILL SWITCH 


024472 


112737 


000006 


024665 




M0V8 


*6,S0M0DE*1 


.-SET FOR SIX(6) DIGITS 


024500 


112737 


000005 


024662 STYPON: 


M0V8 


#5,S0CNT 


;SET THE ITERATION COUNT 


024506 


010346 








MOV 


R3.-<SP> 


; SAVE R3 


024510 


010446 








MOV 


R4. -(SP) 


.-SAVE R4 


024512 


010546 








MOV 


R5,-(SP) 


.-SAVE R5 


024514 


113704 


024665 






M0V8 


S0M0DE*1,R4 


;GET THE NUMBER OF DIGITS TO TYPE 


024520 


005404 








NEG 


R4 




024522 


062704 


000006 






ADD 


#6.R4 


.SUBTRACT IT FOR MAX. AluCTD 


024526 


110437 


024664 






M0V8 


R4.S0M0DE 


.-SAVE IT FOR USE 


024532 


113704 


024663 






M0V8 


S0FILL.R4 


;GET THE ZERO FILL SWITCH 


C24536 


016605 


000012 






MOV 


12<SP),R5 


; PICKUP THE INPUT NUMBER 


024542 


005003 








CLR 


R3 


.-CLEAR THE OUTPUT WORD 


024544 


006105 




IS: 


ROL 


R5 


.•ROTATE MSB INTO "C" 


024546 


000404 








BR 


3$ 


;G0 DO MSB 


024550 


006105 




2$: 


ROL 


R5 


; F ORM THIS DIGIT 


024552 


006105 








ROL 


R5 




024554 


006105 








ROL 


R5 




024556 


010503 








MOV 


R5.R3 




024560 


006103 




5S: 


ROL 


R3 


;GET LS8 OF THIS DIGIT 


024562 


105337 


024664 






DECS 


SOMODE 


; T YPE THIS DIGIT? 


024566 


100016 








BPL 


7$ 


;8R IF NO 


024570 


042703 


1 77770 






BJC 


#1 77770. R3 


;GET RID OF JUNK 


024574 


001002 








BNE 


4$ 


;TES1 FOR 0 


024576 


005704 








TST 


R4 


.•SUPPRESS THIS 0? 


024600 


001403 








BED 


5$ 


*8R IF YES 


024602 


005204 




4$: 


INC 


R4 


•DON'T SUPPRESS ANYMORE 0"S 



CZSMGBO RM05/3/2 DSKLS TST 2 MACRO V04.00 4-APR-81 
BINARY ^0 OCTAL (ASCII) AND TYPE 



024604 


052703 


000060 

Vv W w\/ 


5$: 


BIS 


024610 


052703 


C 00040 

W WW" V 


BIS 


024614 


1 10337 


024660 

V (_ ~ WW V 




M0V8 


024620 


104401 


024660 




TYPE 


024624 


105337 


024662 


7$: 


DECS 


024630 


003347 






BGT 


024632 


002402 






BLT 


024634 


005204 
000744 






INC 


024636 






BR 


024640 


012605 




6$: 


MOV 


024642 


012604 






MOV 


024644 


01 ? 603 






MOV 


024646 


01 6666 


000002 000004 




MOV 


024654 


012616 






MOV 


024656 


000002 






RTI 


024660 


000 




8$: 


.BYTE 


024661 


000 






.BYTE 


024662 


000 




SOCNT : 


.BYTE 


024663 


000 




SOFILL: 


.BYTE 


G24664 


000000 




S0M0DC : 


.WORD 
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#'0.R3 

#• ,R3 

R3.8S 

,8$ 

S0CNT 

2$ 

6$ 

R4 

2$ 

(S rj )*.R5 

(SP)*.R4 

(SP)*.R3 

2(SP).4(SP) 

(SP)*,(SP> 

0 
0 
0 
0 
0 



SE0 0113 



MAKE THIS DIGIT ASCII 

MAKE ASCII IF NOT ALREADY 

SAVE FOR TYPING 

GO TYPE THIS DIGIT 

COUNT BY 1 

BR IF MORE TO DO 

8R IF DONE 

INSURE LAST DIGIT ISN'T A BLANK 
GO DO THE LAST DIGIT 
RESTORE R5 
RESTORE R4 
RESTORE R3 

SET THE STACK FOR RETURNING 
RETURN 

STORAGE FOR ASCII DIGIT 

TERMINATOR FOR TYPE ROUTINE 

OCTAL DIGIT COUNTER 

ZERO FILL SWITCH 

NUMBER OF DIGITS TO TYPE 
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T VP€ ROUTINE SEO 0114 

.S8TTL TYPE ROUTINE 

•'•ROUTINE TO TVPE ASCIZ MESSAGE . MESSAGE MUST TERMINATE WITH A 0 BYTE . 
.••THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
;*NOTE1: $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 

; »NOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 

; *NOTE3: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 

• » 

••CALL: 

;»1) USING A TRAP INSTRUCTION 

;• TVPE ,ME SADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 

.-•OR 

;• TYPE 

ME SADR 



024666 


105737 


001173 




tTYPE: 


TST8 


$TPFLG 


;IS THERE A TERMINAL? 


024672 


100002 








BPL 


1$ 


;BR IF YES 


C24674 


000000 








HALT 




; HAL T HERE IF NO TERMINAL 


024676 


000430 








BR 


3$ ; 


.'LEAVE 


024700 


010046 






1$: 


MOV 


RO.-(SP) 


; SAVE RO 


024702 


017600 


000002 






MOV 


a2(SP).R0 


;GET ADDRESS OF ASCIZ STRING 


024706 


122737 


000001 


001242 




CMPB 


#APTENV.$ENV 


.'RUNNING IN APT MODE 


024714 


001011 








BNE 


62$ 


;NO.GO CHECK FOR APT CONSOLE 


024716 


132737 


000100 


001243 




BITS 


#AP T SPOOL . $ENVM ; 


.SPOOL MESSAGE TO APT 


024724 


001405 








BEQ 


62$ 


;NO.GO CHECK FOR CONSOLE 


024726 


010037 


024736 






MOV 


R0.61$ 


.-SETUP MESSAGE ADDRESS FOR APT 


024732 


004737 


031300 






JSR 


PC.$ATY3 


.-SPOOL MESSAGE TO APT 


024736 


000000 






61$: 


.WORD 


0 


.•MESSAGE ADDRESS 


024740 


132737 


000040 


001243 


62$: 


BIT8 


#APTCSUP,$ENVM ; 


;APT CONSOLE SUPPRESSED 


024746 


001003 








BNE 


60$ 


.-YES.SKJP TYPE OUT 


024750 


112046 






2$: 


MOVB 


(RO)+,-<SPJ 


;PUSH CHARACTER TO BE TYPED ONTO STACK 
;BR IF IT ISN'T THE TERMINATOR 


02^752 


001005 








BNE 


4$ 


024754 


005726 








TST 


(SPJ* 


;IF TERMINATOR POP IT OFF THE STACK 


024756 


012600 






60$: 


MOV 


<SP)+.RO 


.•RESTORE RO 


024760 


062716 


000002 




3$: 


ADD 


#2.(SP> 


.•ADJUST RETURN PC 


024764 


000002 








RTI 


; RE TURN 


024766 


122716 


00001 1 




4$: 


CMPB 


#HT.(SP) ; 


.•BRANCH IF <HT> 


024772 


001430 








BEQ 


8$ 




024774 


122716 


000200 






CMPB 


*CRLF,(SP) 


.•BRANCH IF NOT <CRLF> 


C25000 


001006 








BNE 


5$ 


025002 


005726 








TST 


(SP) + 


;POP <CR><LF> EQUIV 


025004 


104401 








TYPE 




; T YPE A CR AND LF 


025006 


001217 








$CRLF 






025010 


105037 


025216 






CLR8 


$CHARCNT 


.•CLEAR CHARACTER COUNT 


025014 


000755 








BR 


2$ 


;GET NEXT CHARACTER 


025016 


004737 


025100 




5$: 


JSR 


PC.$TYPEC 


;G0 TYPE THIS CHARACTER 


025022 


123726 


001172 




6$: 


CMPB 


$FILLC.(SP)+ 


;IS IT TIME FOR FILLER CHARS. ? 


025026 


001350 








BNE 


2$ 


;IF NO GO GET NEXT CHAR. 


025030 


013746 


001 1 70 






MOV 


$NULt,-(SP) 


;GET # OF FILLER CHARS. NEEDED 
.•AND THE NULL CHAR. 


025034 


105366 


000001 




7$: 


DEC8 


KSP) ; 


.-DOES A NULL NEED TO BE TYPED? 


025040 


002770 








BLT 


6$ 


;8R IF NO— GO POP THE NULL OFF OF STACK 


025042 


004737 


025100 






JSR 


PC.$TYPEC 


;G0 TYPE A NULL 


025046 


105337 


025216 






DEC8 


$CHARCNT 


;D0 NOT COUNT AS A COUNT 


025052 


000770 








BR 


7$ 


.-LOOP 



"ZRMQBO RM05/3/2 DSKLS TST 2 
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L 9 

MACRO V04.00 4-APR-81 01 :?9: S6 PAGE 27 



; HORIZONTAL TAB PROCESSOR 



025054 
025060 
025064 
025072 
025074 
025076 
025100 
025100 
025104 
025106 
025112 
025116 
025122 
025124 
025124 
025130 
C25132 
025136 
025142 
025146 
025150 
025150 
025152 
025152 
025156 
025160 
025166 
025174 
025176 
025202 
025204 
025212 
025214 
025216 
025220 



112716 
004737 
1 32737 
001 372 
005726 
000724 

105777 
100022 
017746 
042716 
122716 
001012 

105777 
100375 
117716 
042716 
122716 
001366 

005726 

105777 
100375 
116677 
122766 
001003 
105037 
000406 
122766 
001402 
105227 
000000 
000207 



000040 
025100 
000007 



154054 

154050 
1 77600 
000023 



1 54030 

154024 
1 77600 
000021 



154006 

000002 
00001 5 

025216 

000012 



025216 



8$: 
9$: 



STYPEC: 



101$: 



102$: 
10$: 



1 54000 
000002 



000002 1$ 



wove 

JSR 

BITS 

BNE 

TST 

BR 

TST8 

BPL 

MOV 

BIC 

CMPB 

BNE 

TST8 

BPL 

M0V8 

BK 

CMPB 

BNE 

TST 



TST8 
BPL 
MOVB 
CMPB 
BNE 
CLR8 
BR 
CMPB 
BEQ 
INC8 
$CHARCNT:.WORD 
$TYP£X: RfS 



#' ,(SP) 
PC.$TYPEC 
#7,$CHARCNT 
9$ 

(SP)* 
2$ 

S$TKS 
10$ 

a$TK8.-(SP) 
#177600. (SP) 
#$XOFF.(SP> 
102$ 

a$TKS 
101$ 

i$TKB t (SP) 
#1 77600. (SP) 
#$XON.(SP> 
101$ 

(SP)* 

a$TPs 

10$ 

2(SP).a$TPB 
#CR.2(SP) 

1$ 

$CHARCNT 
$TYPEX 
#LF.2(SP) 
$TVPEX 

(PC J* 

0 

PC 



1 



SEO 0115 



; ; REPLACE TAB WITH SPACE 
;;TYPE A SPACE 
;; BRANCH IF NOT AT 
;;TA8 STOP 

;;POP SPACE OFF STACK 
;;GET NEXT CHARACTER 

;;CHAR IN KY8D BUFFER? 
;;8R IF NOT 
;;6ET CHAR 

; ; STRIP EXTRANEOUS BITS 
;;WAS CHAR XOFF 
;;8R IF NOT 

;;WAIT FOR CHAP 

;;GET CHAR 
; ."STRIP IT 
;;WAS IT XON? 
;;8R IF NOT 

;;FIX STACK 

;;WAJT UNTIL PRINTER IS READY 

;;LOAO CHAR TO BE TYPED INTO DATA REG. 

;;IS CHARACTER A CARRIAGE RETURN? 

;;8RANCH IF NO 

; ; Y£S— -CLEAR CHARACTER COUNT 

;;EXIT 

;;IS CHARACTER A LINE FEED? 

; .'BRANCH IF YES 

.-.COUNT THE CHARACTER 

;; CHARACTER COUNT STORAGE 
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SEO 0116 



,S8T T L SCOPE HANDLER ROUTINE 



025222 
025222 
025224 
025232 
025234 
C25240 



•THIS 

•AND 

•AND 

•THE 

•SW14 

•SW11 

•SW09 

•SW08 

•CALL 



ROUTINE CONTROLS THE LOOPING Of SUBTESTS. IT WILL INCREMENT 

LOAD THE TEST NUMBER ($TSTNM) INTO THE DJSPLAY REG. (DISPLAY<7:0>) 

LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<1 5:08> 
SWiTCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
=1 LOOP ON TEST 

=1 INHIBIT ITERATIONS 

=1 LOOP ON ERROR 

=1 LOOP ON TEST IN SWR<7:0> 



SCOPE 



;;SCOPE=IOT 



104410 
032777 
001402 
0001 37 



040000 
025664 



153722 1$: 



025240 000416 



SSCOPE : 

CKSWR 
BIT 
BEQ 
JMP 

9$: 

;#####START OF 
SXTSTR: BR 



#8IT14,aSWR 
9$ 

$OVER 

CODE FOR THE XOR 
6S 



025242 


013746 


000004 






MOV 


a#ERRVEC.-(SP) 


025246 


012737 


025266 


000004 




MOV 


#5$,a#ERRVEC 


025254 


005737 


1 77060 






TST 


a#1 77060 


025260 


012637 


000004 






MOV 


(SP)*,a#ERRVEC 


025264 


000561 








BR 


SSVLAD 


025266 


022626 






5$: 


CMP 


(SP)*,(SP)+ 


025270 


012637 


000004 






MOV 


(SP)*.3#ERRVEC 


025274 


000521 








BR 


7$ 


025276 








6$:;#####END OF 


CODE FOR THE XOR 


025276 


032777 


000400 


1 53650 




BIT 


#8IT08,aSWR 


025304 


001421 








BEQ 


2$ 


025306 


005046 








CLR 


-(SP) 


025310 


117716 


1 53640 






MOVB 


aswR.csp) 


0253K 


001414 








BEQ 


8$ 


025316 


022716 


000024 






CMP 


#24, (SP) 


025322 


002411 








BLT 


8$ 


025324 


011637 


001116 






MOV 


(SP),$TSTNM 


025330 


005316 








DEC 


(SP) 


025332 


006316 








ASL 


(SP) 


025334 


062716 


025702 






ADD 


#$SW08TBL.(SP) 


025340 


013637 


001122 






MOV 


3<SP)*.$LPADR 


025344 


000547 








BR 


SOVER 


025346 


005726 






8$: 


TST 


(SP)* 


025350 


105737 


001117 




2$: 


TST8 


$ERFLG 


025354 


001502 








BEQ 


3$ 


025356 


022717 


177777 


026342 




CMP 


#-1, CPSAVE 


025364 


001455 








BEO 


2003$ 


025366 


013746 


000004 






MOV 


ERRVEC-(SP) 


025372 


012737 


025410 


000004 




MOV 


#2000$,ERRVEC 


025400 


013737 


177766 


026342 




MOV 


1 77766, CPSAVE 


025406 


000406 








BR 


2001$ 


025410 


012737 


177777 


026342 


2000$: 


MOV 


#-1. CPSAVE 


025416 


012716 


025424 






MOV 


#2001$, (SP) 


025422 


000002 








RTI 



TEST FOR CHANGE IN SOFT-SWR 

LOOP ON PRESENT TEST? 

NO IF SW14=0 

JUMP OVER SCOPE ROUTINE 



TESTER##### 

IF RUNNING ON THE "XOR" TESTER CHANGE 
THIS INSTRUCTION TO A 'NOP" (NOP-240) 
SAVE THE CONTENTS OF THE ERROR VECTOR 
SET FOR TIMEOUT 
TIME OUT ON XOR? 
RESTORE THE ERROR VECTOR 
GO TO THE NEXT TEST 
CLEAR THE STACK AFTER A TIME OUT 
RESTORE THE ERROR VECTOR 
LOOP ON THE PRESENT TEST 
TESTER##### 
LOOP ON SPEC. TEST? 
BR IF NO 

CLEAR A TEMP. LOCATION 
PICKUP THE DESIRED TEST NUMBER 
BRANCH IF BAD TEST NUMBER IN SUR 
CHECK THE NUMBER IN THE SUR 
BRANCH IF TEST NUMBER IS OUT OF RANGE 
UPDATE THE TEST NUMBER 
BACKUP BY ONE 

SCALE THE TEST NUMBER AS AN INDEX 
FORM THE ADDRESS OF TEST POINTER 
SET LOOP ADDRESS TO DESIRED TEST 
GO LOOP ON THE TEST 

CLEAN THE BAD TEST NUMBER OFF OF THE STACK 
HAS AN ERROR OCCURRED? 
BR IF NO 

SEE IF TIMEOUT WAS PREVIOUSLY RECORDED 
KICK AROUND ROUTINE IF SO 
SAVE CONTENTS OF ERROR VECTOR 
SETUP 'TRAP* RETURN ADDRE'3 
MOVE CPU ERROR REGISTER T«i CPSAVE FOR TEST 

SET CPU ERROR REGISTER TIMEOUT INDICATOR 
SETUP RETURN ADDRESS 
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025424 


012637 


AAAAA/ 

00000A 


025430 


022737 


l fff f f 


025436 


001430 




025440 


032737 


AAAAA 1 

000001 


C25446 


001424 




025450 


042737 


OOUUU i 


025456 


013746 


AAi icy 
001 1 j*i 


025462 


01 7646 


AAAAAA 
OUUUOU 


025466 


012737 


AAA1 ~?C 
UOU1 fb 


025474 


011677 


1 0.5«O*i 


025500 


042777 


AA1 AAA 
00 I 000 


025506 


104177 




025510 


012676 


AAAAAA 


025514 


012637 


AA1 1 C/ 
001 1 3*» 


025520 






025520 


123737 


AA1 171 
00 I I J I 


025526 


101015 




025530 


032777 


AA1 AAA 
00 I 000 


025536 


001404 




025540 


013737 


AA 110/ 

001 !<:*» 


025546 


000446 




025550 


105037 


AA1 117 

UU Mlf 


025554 


005037 


AA1 OA*. 

UU I cUo 


025560 


000415 




025562 


032777 


AA/ AAA 

UUmUOU 


025570 


001011 




025572 


005737 


AA1 ~>X(\ 

U01 cdK) 


025576 


001406 




025600 


005237 


AA1 i on 
UU 1 I c\J 


025604 


023737 


AA1 on*. 
UU1 cUo 


025612 


002024 




025614 


012737 


AAAAA 1 

UUUuUl 


025622 


013737 


ao c 7nn 

Uc J f UU 


025630 


105237 


AA 1 11/, 

UU 1Mb 


025634 


113737 


AA1 1 1i 
UU 1 II o 


025642 


011637 


AA1 1 00 
UU1 ICC 


025646 


011637 


AA1 1 0/1 
UU 1 1 CM 


025652 


005037 


nn 1 o 1 n 
UU I c I U 


025656 


112737 


AAAAA 1 
UUUUU I 


025664 


013777 


AA1 1 1i 

UU 1 1 1 o 


025672 


013716 


UU I I cc 


025676 


000002 




025700 


000024 




025702 








000024 




025702 


005370 




025704 


005 700 




025706 


006062 




025710 


006232 




025712 


006362 




025714 


007446 




025716 


010516 




025720 


010640 




025722 


010724 




025724 


01 1 1 74 




025726 


011524 
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0AA1 < . 

cUU I » : 


nuv 


v or/ * , C VC I 


OOA^/IO 
JcOOHC 


onno* • 


f MP 

LHr 


w I , lr oMVC 




OCA 


onn<* 






Q I T 
□ 1 1 


*p r mn ppcaup 






pen 

DC U 




1 777A*> 
I / / /OD 




a i r 
□ it 


TOJ 1 V/U t \ f I 1 DO 






nuv 


CUP -CCD} 
own * V 5r / 






nuv 


VV jr / 0 V 3r / 


nm 1 1;/. 

UU 1 1 




MOW 

nuv 


JM7A CUD 
w 1 f D t own 






Mnu 
nuv 


rcPi acuR 

l Or / ( 93Wn 


I J jhho 




a [ r 

Oil 


JTRITOQ 3CUR 
WO J IU7,wown 






PMT 


1 77 






Mnw 
nuv 


I or / T , 01 V Or / 






MOV/ 

nuv 


(cp)i CUR 
V or / T , own 




onn*« • 






AA1 117 




r Mpfl 


tFRMAx SFRFI G 
•cn/T^A i »t nr lu 






on j 


7* 


1 CZ/ 1 A 




PIT 


0QITOQ acuR 

wo J iv/T#afown 






DC W 


4$ 


nm 1 ?? 


7t • 


nuv 


SI PPPR SI PADR 

#Lr Cnn * #Lrfll/li 






on 


tnvFR 














ft P 


XT TMPC 






PR 

on 


1 J 


1 JJJO 1 * 


IS. - 


R I T 


4RIT11 3C.UR 






RAJF 
otic 


It 

1 9 






TCT 

1 o 1 








RFQ 

DC W 








1 


t f TNT 


nm 1 ?o 

Uu 1 1 CU 




f MP 


crrMcc jcnT 






Rf,F 




nni 1 ?o 


1 4> • 


Mny 

nuv 


fr I # #i 1 






MAW 






$c.VI AD • 


I NCR 


STSTNM 






Mnv/q 


STSTNM STESTN 






MOV 


(SP) .SLPADR 






MOV 


(SP),$LPERR 






CLR 


SESCAPE 


001131 




M0V8 


*1,$ERMAX 


153264 


S0VER: 


MOV 


STSTNM.SDI SPLAY 






MOV 


SLPADR, (SP) 






RTI 






SMXCNT: 


20. 





5SW08T8L: 
.REPT $TN-1 

.WORD TST1+2 

.WORD TST2+2 

.WORD TST3+2 

.WORD TST4+2 

.WORD TST5+2 

.WORD TST6+2 

.WORD TST7*2 

.WORD TST10+2 

.WORD TST11+2 

.WORD TST12*2 

.WORD TST13+2 



RESTORE CONTENTS OF ERROR VECTOR 

SEE IF CPSAVE HAS CPU ERR REG TIMEOUT INDICATION 
BRANCH IF SO 

SEE IF THE POWER MONITOR BIT JS ON 

BRANCH TO CONTINUE ROUTINE IF CLEAR 

CLEAR THE BIT FOUND TO BE SET 

SAVE SWR ADDRESS 

SAVE SWR VALUE 

GET SOFTWARE SWR ADDRESS 

GET CURRENT SWR VALUE 

DON'T ALLOW LOOP ON ERROR ON THIS ERROR 
CALL SPECIAL POWER FAIL BIT ERROR CALL 
RESTORE SWR TO ORIGINAL VALUE 
RESTORE SWR ADDRESS 

MAX. ERRORS FOR THIS TEST OCCURRED? 

BR IF NO 

LOOP ON ERROR? 

BR IF NO 

;SET LOOP ADDRESS TO LAST SCOPE 
rZERO THE ERROR FLAG 

: CLEAR THE NUMBER OF ITERATIONS TO MAKE 
; ESCAPE TO THE NEXT TEST 
;INHI8IT ITERATIONS? 
'BR IF YES 

•IF FIRST PASS OF PROGRAM 
INHIBIT ITERATIONS 
; INCREMENT ITERATION COUNT 
; CHECK THE NUMBER OF ITERATIONS MADE 
;8R IF MORE ITERATION REQUIRED 
; REINITIALIZE THE ITERATION COUNTER 
;SET NUMBER OF ITERATIONS TO DO 
; COUNT TEST NUMBERS 
;SET TEST NUMBER IN APT MAILBOX 
rSAVE SCOPE LOOP ADDRESS 
;SAVE ERROR LOOP ADDRESS 
j CLEAR THE ESCAPE FROM ERROR ADDRESS 
;0NLY ALLOW ONE(I) ERROR ON NEXT TFST 
.DISPLAY TEST NUMBER 
; FUDGE RETURN ADDRESS 
•FIXES PS 

•MAX. NUMBER OF ITERATIONS 



STARTING ADDRESS OF TEST 1 

STARTING ADDRESS OF TEST 2 

STARTING ADDRESS OF TEST 3 

STARTING ADDRESS OF TEST 4 

STARTING ADDRESS OF TEST 5 

STARTING ADDRESS OF TEST 6 

STARTING ADDRESS OF TEST 7 

STARTING ADDRESS OF TEST 10 

STARTING ADDRESS OF TEST 11 

STARTING ADDRESS OF TEST 12 

STARTING ADDRESS OF TEST 13 



025730 0121 '0 

025732 012436 

025734 013106 

025736 013532 

025740 013754 

025742 014446 

025744 015434 

025746 016702 

025750 0200 7 2 



.WORD TST14*? 

.WORD TST15 *2 

.WORD TST16»2 

.WORD TST1 7*2 

.WORD TST20*2 

.WORD TST2W 

.WORD TST22*2 

.WORD TST23*2 

.WORD T$T2W 



STARTING ADDRESS OF TEST 14 
STARTING ADDRESS Of TEST 15 
STARTING ADDRECS OF TEST 16 
STARTING ADDRESS OF TEST 17 
STARTING ADDRESS OF TEST 20 
STARTING ADDRESS OF TEST 21 
STARTING ADDRESS OF TEST 22 
STARTING ADDRESS OF TEST 23 
SURTING ADDRESS OF TEST 24 
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.S8TTL ERROP HANDLER ROUTINE 



SEO 0119 



THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
SAVE THE ERROR ITEM NUMBER AND THE ADDRESS Of THE ERROR CALL 
AND GO TO ERRTYP ON ERROR 

THE SWITCH OPTIONS PROVIDED Br THIS ROUTINE ARE: 
SWl 5=1 HALT ON ERROR 

INHIBIT ERROR TYPEOUTS 



SW13=1 
SW10=1 
Sw09=1 
CALL 



BEwL ON ERROR 
LOOP ON ERROR 



ERROR 



025^52 


105037 


026344 




IFRROR - 


CLRfi 


IBSAvF 


0 


025756 


104410 








CKSWR 




0 


025760 


105237 


001 1 1 7 




7$- 


IN r B 


$FRF L G 


0 


025764 


001775 








BFQ 


7$ 


• 


025766 


013777 


001116 


1 53162 




MOV 


$TSTNM,iCI SPLAY 


0 


C25774 


032777 


OC2000 


153152 




BI T 


#bitio aswR 


0 


026002 


001402 








BEQ 


1$ 


0 


026004 


104401 


001212 






TYPE 


,$BELL 


m 


026010 


005237 


001 126 




1$: 


INC 


$ERTTL 


0 


026014 


011637 


001 1 32 






MOV 


(SP) $FRRPC 


0 


026020 


162737 


000002 


001 132 




SUB 


#2 $ERRPC 




026026 


117737 


153100 


001130 




MOVB 


ilFRRPC SITFMB 


# 


026034 


032777 


001000 


153H2 




BI T 


MI T09.3SWR 


• 


C26042 


001060 








BNE 


1004$ 


• 


026044 


122737 


000177 


00^30 




CMPB 


»\77 $ITEMB 


0 


026052 


001454 








BEQ 


1004$ 


9 


026054 


105737 


026344 






TST8 


I8SAVE 


m 


02*060 


001047 








BNE 


1003$ . 


* 


026062 


022737 


1 77777 


026342 




CMP 


#-1 CPSAVE 


* 
0 


026070 


001445 








BEO 


1004$ 


• 


026072 


01 3746 


000004 






MOV 


ERRVEC -(SP) 




026076 


012737 


026114 


000004 




MOV 


#1000$,ERRVEC 




026104 


013737 


177766 


026342 




MOV 


177766. CPSAVE 


« 


0;'6112 


000406 








BR 


1001$ 




0.'?6114 


012737 


177777 


026342 


*0C0$: 


MOV 


#-1 t CPSAVE 


m 


026122 


012716 


026130 






MOV 


#1001$. (SP) 


* 


C26126 ' 


000002 








RTI 




C26130 


012637 


000004 




1001$: 


MOV 


(SP)*.ERPVEC 


• 


026134 


022737 


177777 


026342 


1002$: 


CMP 


#-1. CPSAVE 


0 


026142 


001420 








BEO 


1004$ 


0 


026144 


032737 


000001 


026342 




BIT 


#81 TOO, CPSAVE 


• 


026152 


001 4 U 








BEO 


1004$ 


w 


026154 


042737 


0000C1 


1 Z7766 




SIC 


#81 TOO, 177766 


• 


026162 


113737 


001130 


026344 




MOVB 


$ITEMB,IBSAVE 


• 


026170 


112737 


000177 


001130 




MOVB 


#177.$ITEMB 


* 


026 1 76 


000402 








BR 


1004$ 


t 


026200 


105037 


026344 




1003$: 


CLR8 


I8SAVE 


» 


026204 








1004$: 




026204 


032777 


020000 


'52742 




BIT 


#8IT13,dSWR 


m 


026212 


001004 








BNE 


20$ 


0 


C2621 4 


004737 


026346 






JSR 


PC, ERRTYP 


0 



;;ERR0R=EMT AND N= ERROR ITEfc NUMBER 

CLEAR THE ITEM BYTE SAVE LOCATION 
TEST FOR CHANGE IN SOFT-SWR 
SET THE ERROR FLAG 
DON'T LET THE FLAG GO TO ZERO 
DISPLAY TEST NUMBER AND ERROR FLAG 
BELL ON ERROR? 
NO - SKIP 
RING BELL 

COUNT THE NUMBER OF ERRORS 
GET ADDRESS OF ERROR INSTRUCTION 

STRIP AND SAVE THE ERROR ITEM CODE 
SEE IF LOOP ON ERROR IS SET 
BRANCH AROUND ROUTINE IF SO 
SEE IF THIS IS THE POWER FAIL CALL 
BRANCH AROUND ROUTINE IF IT IS 

SEE IF THIS IS THE 2ND ERROR CALL IN THIS ROUTINE 
BRANCH IF SO 

SEE IF CPSAVE HAS CPU ERR REG TIMEOUT INDICATION 
BRANCH IF SO 

SAVE CONTENTS CF ERROR VECTOR 
SETUP 'TRAP* RETURN ADDRESS - 
MOVE CPU ERROR REGISTER TO CPSAVE FOR TEST 



.-.RESTORE CONTENTS OF ERROR VECTOR 

SEE IF CPSAVE HAS CPU ERR REG TIMEOUT INDICATION 
BRANCH IF SO 

SEE IF POWER MONITOR BIT IS SET IN CPU ERR REG 
BRANCH IF OK 
CLEAR THE BIT FOUND SET 
MAKE I8SAVE NON-ZERO FOR DUAL ERROR CALL 
SET $ITEMB TO SPECIAL POWER FAIL POINTER 
BRANCH OVER IBSAVE CLEARING 

; .-CLEAR IBSAVE SO 2ND TIME THROUGH EXITS 

SKIP TYPEOUT IF SET 
SKIP TYPEOUTS 
GO TO USER ERROR ROUTINE 
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026220 




0012 1 








026224 






AA1 0/ 0 


r MDQ 


026224 


122737 


000001 




026252 


001007 










026254 


1 -1 1717 


Artl 1 7 A 

00 1 1 51' 


U262»»c 






026242 


AAV 7?7 

004757 


ATI 71 A 

051 5 1 J 






1 CD 


026246 


AAA 

000 






51*. 


Q v Tt 


026247 


ooc 








a v tc 


026250 


C0077 






: 


BR 


026252 


1 AC 7T 7 

105757 


026544 




2»: 


T C TB 


Q<?6<?56 


AA 1 A/" C 

00 lOt'5 








BMP 


026260 


AAC 7 77 


1 C O*. "»A 

1 526' 0 










1 rt/VrtO 

lOOt 02 








BBl 


026266 


000000 










mil >r\ 

026270 


1 Ay riA 

1 Us-» ' U 








rr CuB 


026272 








7* • 
j»- 


Q I T 


026272 


AT J 777 

0527 7 r 


AA1 Wi 

UO 1 JUU 






026 .500 


rtf i 1 at 

OL ls02 








BFO 


026502 


A : 771 4. 
0 i J' 16 


OU I I £*• 








026-506 


AAC 7 7 7 

005 rbr 


AA 1 T1 A 

Ov 12 '0 




TC.T 


0263 • 2 


JO IS02 








DC 0 
OEM 


A. 7/. 7.1 / 

0265 H 


11 771*. 


to i c i u 






MDV 


026 52U 








79 • 




026 520 


\JCCfbf 










UCUJcD 


wv ■ vv 1 








BNE 


026330 


000000 






61: 


HALT 


02633--> 










026332 


105737 


026344 






TST8 


026336 


001210 








BN£ 


026340 


000002 








RTJ 


026342 


000000 








.WORD 


026544 


000000 








.yQRD 



D 10 
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SEQ 0120 



,$CRLf 

#APTENV.SENV 
2t 

SITEMB.2H 
PC.*ATy4 

0 

C 

22f 

ISjAvE 

3$ 

iSWR 
3t 



*8IT09.a5uR 
4$ 

$LPERR.(SP) 

•ESCAPE 

5$ 

SESCAPE.(SP) 

«*ENDAD.a*42 
6S 



I8SAVE 
7$ 

0 
0 



running in apt mode 

no .skip apt error report 

set item number as error number 

report fatal error to apt 



;APT ERROR LOOP 

;SEE IF I8SAVE IS LOADED 

; BRANCH IF NOT - NO HALT ON PUR MOW 81 T ERROR 

.-HALT ON ERROR 

;SKJP If CONTINUE 

.-HALT ON ERROR! 

; TEST FOR CHANGE IN SOFT-SWR 

.LOOP ON ERROR SWITCH SET? 
■BR IF NO 

; FUDGE RETURN FOR LOOPING 
; CHECK FOR AN ESCAPE ADDRESS 
'BR IF NONE 

; FUDGE RETURN ADDRESS FOR ESCAPE 

;ACT-11 AUTO-ACCEPT? 
.-BRANCH IF NO 
;YES 

;SEE IF ITEM BYTE SAVE LOCATION HAS AN ERROR CALL 

; BRANCH BACK TO CALL ORIGINAL ERROR 

'RETURN 

;L0CATI0N TO SAVE CPU ERROR REG CONTENTS 
.•LOCATION TO SAVE HEM BYTE 
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2 
3 

5 
6 
7 
8 
9 
10 
11 
12 
'3 
U 
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026346 
026350 
15 026356 
"6 026360 

18 
19 

20 C26364 

21 026370 

22 026374 

026400 
026402 
026403 

23 
24 

25 026404 

26 026410 

27 026414 

28 026420 

29 026426 

30 026432 
31 

32 026434 

33 026442 

34 026446 
35 

36 026450 

37 026456 

38 026462 

39 026464 
AO 026470 
41 026472 
42 

A3 

44 026474 

45 026500 

46 026506 

47 026512 

026516 
026520 
026521 

48 026522 

49 026526 



104414 
032777 
001402 
000137 



104401 
104401 
013746 

104403 
003 
000 



01 3700 
016000 
042700 
012737 
022700 
001414 

012737 
022700 
001406 

012737 
022700 
001004 
104401 
104401 
000000 



005037 
013737 
104401 
01 3746 

104403 
003 
000 
005037 
113737 



020000 
027206 



0C1217 
027222 
001234 



001276 
000026 
1 77740 
032211 
000024 



032204 
000025 



032216 
000027 

027257 



027212 
001226 
027227 
027212 



027211. 
001 1 30 



S£0 0121 



.S8ru ERROR TYPE OUT ROUTINE 

•THE ERROR TYPE OUT ROUTINE ASSEMBLES AND PRINTS INFORMATION 
•REGARDING THE DETECTION Of AN ERROR AS FOLLOWS: 

.UNIT NUMBER, DRIVE TYPE. TEST NUMBER, ERROR NUMBER AND 
•PROGRAM COUNTER ARE PRINTED ON THE FIRST LINE; 

.ERROR MESSAGE IS ASSEMBLED, FORMATTED AND PRINTED ON 
•ONE OR MORE SUCCEEDING LINES; 

• .PAIRED LINES OF ERROR HEADERS AND ERROR DATA ARE PRINTED 

•AFTER THE ERROR MESSAGE. 



1 52576 



ERRTYP: 



SAVPEG 
BIT 
BEQ 
JMP 



*SUl3,iSWR 

1$ 

27$ 



.-INHIBIT TYPEOUTS?? 

;N0..' 

;VES! . 



.-TYPE UNI 7 NUMBER. DR I VE TYPE, TEST NUMBER, ERROR NUMBER, AND 
; PROGRAM COUNTER 
1$: TYPE .SCRLF 

TYPE .ERTYOO 

MOV $UNIT.-(SP) 



TYPOS 
.BYTE 3 
.BYTE 0 



TYPE "DRV*" 

.-SAVE SUNN FOR TYPE OUT 
.-TYPE DRIVE NUMBER 
;G0 TYPE— OCTAL ASCII 
.-TYPE 3 DIGIT(S) 
.•SUPPRESS LEADING ZEROS 



;TYPE "DRIVE TYPE " RM05. RM03 OR RM02 FOR UNIT UNDER TEST 



026472 

i 

026472 
02647? 



MOV 


S8ASE.R0 


;GET RM BASE ADDRESS 


MOV 


RMDT(RO) ,R0 


;GET DRIVE TYPE REGISTER 


BIC 


*1 77740 ,R0 


.-SAVE DRIVE TYPE BITS AND 


MOV 


#$RM03.3S 


;GET ASCII DRIVE TYPE 


CMP 


#24. RO 


;IS DEVICE AN RM03 ? 


BEO 


2S 


;YES !.' 


MOV 


#$RM02.3$ 


.SAVE ASCII DRIVE TYPE 


CMP 


#25. RO 


;IS DEVICE AN RM02 ? 


BEO 


2S 


;YES !.' 


MOV 


#SRM05.3$ 


;SAVE ASCII DRIVE TYPE 


CMP 


027. RO 


;IS DEVICE AN RM05 ? 


BNE 


4$ 


;N0 !! 


TYPE 


,£RTY05 


.TYPE " - " 


TYPE 




; T YPE DRIVE TYPE 


.WORD 


0 


.-DRIVE TYPE MESSAGE IS STORED 



027212 



027214 



2$: 
3$: 

.-TYPE TEST NUMBER. ERROR NUMBER AND PROGRAM COUNTER 

41: CLR TSTNMB 

MOV STESTN. TSTNMB 

TYPE .ERTY01 

MOV TSTNMB, -(SP) 

TYPOS 

.BYTE 3 

.BYTE 0 

CLR ERRNMB 

MOVB $ITEMB,FKRNMB 



LOAD TEST NUMBER FOR 

TYPE '7ST#" 
SAVE TSTNMB FOR TYPE OUT 
TYPE TEST NUMBER 
GO TYPE— OCTAL ASCII 
TYPE 3 DIGIT(S) 
SUPPRESS LEADING ZEROS 
LOAD ERROR NUMBER FOR 
TYPE OUT 
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SEQ 012? 



jU UcT>j5*» 


UUl*»Uo 




51 026536 


104401 


C27237 


52 026542 


013746 


02^214 


UcTO JHO 


1 U*»*«U J 




UcCj ju 






Uco j j i 


Ann 
uUU 




J 3 UcOjjc 


in/ / ni 
1 U*»*iU I 


Uc'c*»o 


c/ d3aha 

J*» UcDJJD 


m 77Z.A 
U 1 J' HO 


UU I I Jc 


UcO JOc 


lAj/ft? 

i UhhU J 




Uco jo*» 






n3A<Ai 

UcO JO J 


UU 1 




cc 
J J 






JO 






17 (Y34- 1AA 
J ' UcG JOO 


f»nc.777 
UU Jf J' 


Uc' c 1 •» 


IB n3A173 
JO UcO J' c 


nm rvr>5 

UU I UUc 




1Q <">3A17c. 

37 UcOJ'"t 


nnm 77 
UUU 1 J' 


yjcr cuo 








A1 rPAA/Vl 
O 1 UcOOUU 


1 n/.cm 

1 USHU 1 


ATI 31 7 
UU 1 c • ' 


Oc UcOOU*» 


i UjUj' 


fi?733n 
Uc ' ecu 


Dj UcOO 1 u 


mc,n77 

1 U JU J' 


Uc f cc l 


i/ n3AAi£ 


U 1 J' UU 


r\3731Z. 


Dj UcOOcU 


1 337fVi 


nnm 77 

UUU 1 f ' 


AA 0?AA3/« 
OO UcOOcH 


UU 1 VjVJ J 




6' 026626 


012/00 


02^264 


OO UcOO Jc 


UUVHU J 




AQ fi3AA7Z. 
Q7 UcOOj*» 


n<v.7nn 

UUO jUU 




70. n3AA7A 
' U UcOO jO 


nnA7nn 

UUOjUU 




71 n?AAz.n 

' I UcDCtU 


uUojvv 




73 n3AAZ.3 
' c UcOCtc 


UOc ' UU 


UU 1 J Jc 


7< A3AA/.A 
' J JcOO*»o 


fl1 1 nm 
U 1 • UU I 




7/ 






' J UcOO JU 


nni Sf'7 

UU 1 JO' 




7A 

' o 






77 






/ O UcOO Jc 


U 1 c 1 Uc 




7Q flPAAIc, 
'7 UcOOJH 


nm sns 

UU 1 JUj 




an opaaia 

OU UcOO JO 


U 1 Ut J' 


Uc f \JC* 


SI nPAAAP 
O I UcOOOc 


onsn^7 

wJUJf 


fi3??1 A 
Uc ' c 'O 


B3 H.3AAAA 
oc UcOOOO 


i i 

1 1 ccUj 




B7 P3AA70, 


UU l*» J*» 




Q/_ f)3AA73 
0*» UcOO ' c 


tCC'<JD 


UUUU t j 


R1 f>3AA7A 


UU 1 UU J 




ra n?A7no 

OO UcO f UU 




Uc' cc 1 


B7 n3A7fV. 
O f UcO / u*» 


UUU ' /u 




on f)3A7fiA 
OO UcO'UO 


■ CC'yJj 


nnnni 3 

UUUU ' c 


BO fl3A713 
O r UcO' l c 


rW11 7AS 
UU 1 r UJ 




00 03A71£ 
TV UcC' l*f 


1 cc ' UJ 


UUUU 1 1 


91 026720 


001007 




92 026722 


105237 


027221 


93 026726 


132737 


000007 027221 


94 026734 


001372 




95 026736 


000407 




96 026740 


105237 


027221 


97 026 744 


122703 


000040 


98 026750 


007002 





51: 



BEQ 

TrPE 

MOV 

TrPOS 
.8VTE 
• BYTE 
TYPE 
MOV 

TYPOS 
.8VTE 
.BYTE 



5$ 

.ERTY02 
ERRNMB.- (SP) 



3 

0 

.ERTY03 
SERRPC.-(SP) 



6 
1 



SKJP IF NO ERROR CALLED 
TYPE "ERR#" 

; SAVE ERRNM8 FOR TYPE0UT 
; TYPE ERROR NUMBER 
;G0 TYPE— OCTAL ASCII 
;TYPE 3 DIGIT(S) 
.■SUPPRESS LEADING ZEROS 
TYPE "PC=" 

.-SAVE SERRPC FOR TYPE OUT 
; T YPE PROGRAM COUNTER 
;G0 TYPE— OCTAL ASCII 
.-TYPE 6 DIGJT(S) 
.-TYPE LEADING ZEROS 



; GENERATE POINTER TO ERROR TABLE UNLESS ERROR NUMBER IS 0 



6$: 



7$: 



8S: 



0$. 



;TYPE 
'0$: 



1'f: 



*2l: 



It: 



14$: 



T ST 
BNE 
J MP 

TYPE 

CLR8 
CLRB 
MOV 
CMP6 
BNE 
MOV 
BR 
ASL 
ASL 
ASL 
ADD 
MOV 

BE0 

THE ERROR 
MOV 
BEQ 
MOV 
CLR 
M0VB 
BE0 
CMP8 
BNE 
CLRB 
BR 
CMP8 
BEQ 
CMPQ 
BNE 
INC8 
BIT8 
BNE 
BR 
INC8 
CMP8 
BNE 



ERRNMB 
7$ 
27$ 

,$CRLF 
B0TFLG 
CHRCNT 
ERRNMB. R0 
#1 77. R0 
8$ 

#PF ECH.R0 

9$ 

R0 

R0 

R0 

#$ERRTB-8..R0 

(RO).RI 

19$ 

MESSAGE 

(R1)*.R2 

19$ 

R2J8$ 
DOT ADR 
(R2)*.R3 
17$ 

#CR.R3 
12$ 

CHRCNT 
11$ 

#LF.R3 
11$ 

#HT.R3 
14$ 

CHRCNT 
#7, CHRCNT 
13$ 
15$ 

CHRCNT 
#' .R3 
15$ 



WAS AN ERROR CALLED? 
BR IF YES 
NO— EXIT 

VES-T YPE CRLF 

CLEAR B0T FLAG 

CLEAR CHARACTER COUNTER 

R0 POINTS TO FIRST OF 

SEE IF THIS ERROR CALL IS SPECIAL POWER FAIL CALL 
BRANCH IF NOT 

MOVE POWER FAIL ERROR CALL TABLE TO R0 

FOUR ENTRIES IN ERROR 
TABLE 



R1 POINTS TO ERROR MESSAGE 
TABLE 

BRANCH IF NO ERROR MESSAGE 



R2=ADDRESS OF MESSAGE STRING 
BRANCH IF END OF MESSAGE 
LOAD ADDRESS OF STRING 
CLEAR B0T ADDRESS 
END OF STRING?? 
YES' 1 

CARRIAGE RETURN?? 
NO! ! 

YES-CLEAR CHAR COUNT 
GET NEXT CHARACTER 
LINE FEED?? 

YES-GET NEXT CHARACTER 
HORIZONTAL TAB?? 
NO! ! 

ADJUST CHARACTER COUNT 



INCREMENT CHARACTER COUNT 

SPACE?? 

NO. . 
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99 02675? 

y ' V/C W » -/ C 


01G237 


0?7?16 








1 00 026756 


122757 


C00100 


0?7??1 




f MPS 


* V I UC w r V/^ 


10*340 










'02 026766 


01 3704 

V/ 1 j r V/~ 


027216 

V/C ' C I v 






MOV 




001007 








D<1L 


104 026774 


104401 


00121 7 






T VPF 


105 027000 


105037 


027221 

V/C ' c c ■ 






V L *»'J 


106 027004 

-/ w VC * 


01 370? 

V/ J » V/C 


027024 

V/C ' v/c 






MOV 

' 'V/ w 


"07 027010 


000726 








BR 


108 027012 


105044 






16S - 


ft RB 


109 027014 


112737 


"i 77777 


027220 

V/C r CC V 






*10 027022 


104401 






1 7 $: 


type 


" 1 1 027024 


000000 

V V W w V w 






18S: 


WORD 


"2 027026 


105737 


027220 






TSTB 

1 J "J 


115 027032 


001707 








BE0 


114 027034 


104401 


001217 






type 

1 ' • c 


'15 027040 


105037 


027220 






ClRB 


M6 027044 


105037 


027221 






CLRB 


11? 027050 


01 3702 


027216 






MOV 


'18 C27054 


010237 


027024 






MOV 


119 027060 


112742 


000040 






MOvB 


120 027064 


105722 








TSTB 

1 J "J 


"•21 027066 


000677 








BR 


122 












123 








• TyPF 


ERROR H 


• C*» \Jc. f\Jf\j 


fil/sfVll 

u 1 OW 1 


UUl/UUc 






ItUV 


125 027074 


001444 








8E0 


126 027076 


10£401 


001217 






TYPE 


127 027102 


016002 


000004 






MOV 


128 027106 


016003 


000006 






MOV 


129 027112 


012137 


027122 




2Ct: 


MOV 


130 027116 


001433 








BE0 


131 










132 027120 


104401 








type 


133 027122 


000000 






2"$: 


.WORD 


'34 027124 


104401 


0012 1 7 






TYPE 


135 027130 


005702 








T 5T 


136 02713? 


001 767 








BEG 


137 027134 


012204 








MOV 


'38 027136 


012305 








MOV 


139 027140 


105725 






>2\: 


TSTB 


140 C27142 


100407 








9MI 


141 027144 


001403 








BE0 


142 027146 


01 3446 








M0\/ 


143 027150 


104405 








T YPDS 


144 027152 


000405 








BR 


145 027154 


013446 






?3$: 


MOV 


146 027156 


104402 








T YP0C 

' r wv> 


147 027160 


000402 








BR 


148 027162 


013446 






24J: 


MOV 


149 027164 


104406 








TYPBN 


150 027166 


005714 






£*>%: 


TST 


151 027170 


001403 








BE0 


152 027172 


104401 


027254 






TYPE 


153 027176 


000760 








BR 


154 027200 


104401 


001217 






T*PE 


155 027204 


000742 








BR 



G 10 

0 1 :29:56 PAGE 30-2 



SE0 0123 



R2.B0TADR 
#64. .CHRCNT 
11$ 

BOTADR.R^ 

16$ 

,$CRLf 

CHRCNT 

18$. R2 

11$ 

- ( 'H, ) 

*-1.B0TFLG 



B0TFLG 

10$ 

.$CRLF 

BOTE LG 

CHRCNT 

B0TADR.R2 

R2.18$ 

#• ,-(R2) 

(R2>* 

11$ 



SAVE ADDRESS OF SPACE 
END Of LINE?' 
NO - ! 

GET ADDRESS Of LAST SPACE 
BRANCH IF SPACE DETECTED 
TYPE CRLf 

CLEAR CHARACTER COUNT 
SET UP R2 FOR TESTING 

REPLACE SPACE 
SET 80T FLAG 

TYPE ERROR MESSAGE STRING 
STRING ADDRESS GOES HERE 
WAS STRING TRUNCATED?? 
NO! I 

YES-TYPE CRLF 
CLEAR B0T FLAG 
CLEAR CHARACTER COUNT 
SETUP R2 FOR TESTING 
SETUP 18$ FOR TYPING 
RESTORE SPACE 
RESTORE R2 
TYPE REST OF STRING 



VDER AND ERROR DATA 
2(R0;.R1 
27$ 
,$CRLF 
4(R0).R2 
6(R0).R3 
<R1>*.21$ 
27$ 



R1 POINTS TO ERROR HEADER TABLE 
BRANCH IF NO HEADER 
(ASSUME NO DATA) 
R2 POINTS TO DATA ADDRESS TABLE 
R3 POINTS TO FORMAT TABLE 
PUT HEADER ADDRESS FOR TYPE 
BRANCH IF END OF HEADERS 
(ASSUME END OF DATA) 



0 

.$CRL f 

R2 

20$ 

(R2>*,R4 

(R3)*,RS 

(R5)* 

2'.% 

23$ 

a<R4)*,-<sp> 

25$ 

i(R4;».-(SP) 
25$ 

a(R4)»,-(SP) 

(R4) 
26$ 

.ERTY04 

22$ 

,$CR.F 

20$ 



.header address goes here 

data with header?? 

no;; 

r4 points to data address 
r5 points to format 
what kind of data?? 

BINARY 

OCTAL 

DECIMAL 



more data?? 

no: ; 

yes-type 2 spaces 
and continue 
type one blank line 
before next header 



ZHMQBO RM05/3/2 DSKLS TST 
TkSOR TvPEOuT ROUTINE 



'56 
157 
158 
159 
160 
161 
162 
163 
'64 
7 65 
166 

168 
169 
170 
171 
172 
173 
'74 
175 
'76 
177 
*78 
T79 
*8C 
T 81 
'82 



027206 
027210 

027212 
0272K 
027216 
027220 
027221 

027222 
027227 
027217 
027246 
027254 
027257 

027264 
027274 
027300 

027362 
027366 

027400 
027402 
027406 
027410 



1044^5 
000207 

000000 
000000 
000000 
000 
000 

104 
054 
054 
054 
040 
040 

027274 
027300 
120 

027366 
103 

027<,02 
C26342 
027410 
000 



122 
040 
0*0 
040 
040 
055 

027362 
OOOOCO 
117 

000000 
120 



000000 
000 



1ACRC .'04.00 



271: 



TSTNMB 
ERRNMB 

BOTADR 
80TFLG 
CHRCNT 

126 ERTYOO 

124 ERTV01 

105 ERTV02 

120 ERTV03 

000 ERTV04 

040 ERTY05 
.EVEN 

027400 PFECH: 



H 10 
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SEO 0124 



127 



'25 



PFECH2: 

P f E Ch3: 
PFECH4: 



RESREG 
RTS PC 



.WORD 
.WORD 
. JORD 
.BYTE 
• BYTE 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASL1Z 



0 
0 
0 
0 

c 

a, TESTES 

a, err*3 
a, pc=a 
a a 
a - a 



TEST NUMBER 
ERROR NUMBER 

BEGINNING Of TEXT ADDRESS 
80T FLAG 
; CHARACTER COUNT 



PFECH1: .♦4.0 



PFECH1.PFECH2.PFECH3.PFECH4 ;WORDS DEFINING TABLES BELOW 

? POWER MONITOR BIT IN CPU ERROR REGISTER FOUND SET? 



.ASCIZ 
.EVEN 
.♦4.0 
.ASCIZ 
.EVEN 
.♦2 
.WORD 
.♦2 
.BYTE 



7CPUERREG? 

CPSAVE.O 

0.0 



rZRMQBO RW05/3/2 DSKLS T ST 2 
"TV input ROUTINE 
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.serr L ttv input routine 



SEQ 0125 



02741? 000000 
0274 K 000000 
027416 000000 
027420 

02742' 



.ENABL LS8 
$TKCNT: .WORO 0 
$TKQIN: .WORD 0 
$TKQOUT: .WORD 0 
STKOSRT: .BLK8 1 
$TKGEND=. 
• EVEN 



.-NUMBER Of ITEMS IN QUEUE 

; INPUT POINTER 

;OUTPUT POINTER 

; TT Y KEYBOARD QUEUE 



•TK INITIALIZE ROUTINE 

•THIS ROUTINE WILL INITIALIZE THE TTV KEYBOARD INPUT QUEUE 
•SETUP THE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT 



•CALL ; 



JSR 

RETURN 



PC.STK1NT 



C27422 


005037 


027412 




JTKINT: CLR 


STKCNT 


027426 


012737 


027420 


027414 


MOV 


#$TKQSRT,$TKQIN , 


027434 


013737 


027414 


027416 


MOV 


STKQIN.STKOOUT , 


027442 


012737 
012737 


027472 


000060 


MOV 


#$TKSRV,WTKVEC 


027450 


000200 


000062 


MOV 


#200,8#TKVEO2 


027456 


005777 


151500 




TST 


9STK8 


027462 


012777 


000100 


151470 


MOV 


#l00,a$TKS 


027470 


000207 






RTS 


PC 



CLEAR COUNT OF JTEMS IN QUEUE 
MOVE THE STARTING ADDRESS OF THE 
QUEUE INTO THE INPUT I OUTPUT POINTERS. 
INITIALIZE THE KEYBOARD VECTOR 
"BR" LEVEL 4 
CLEAR DONE FLAG 
ENABLE TTY KEYBOARD INTERRUPT 
RETURN TO CALLER 

•TK SERVICE ROUTINE 

•THIS ROUTINE WILL SERVICE THE TTY KEYBOARD INTERRUPT 

•BY READING THE CHARACTER FROM THE INPUT BUFFER AND PUTTING 

•IT IN THE QUEUE. 

•IF THE CHARACTER IS A "CONTROL-C" CO fTKINT IS CALLED AND 

•UPON RETURN EXIT IS MADE TO THE "CONTROL-C" RESTART ADDRESS (SHUT) 



027472 


117746 


151464 




STKSRV: 


M0V8 


a$TK8,-(SP> 


.-PICKUP THE CHARACTER 


027476 


042716 


1 77600 






BIl 


# A C177.(SP) 


.-STRIP THE JUNK 


027502 


021627 


000021 






CMP 


<SP),#$XON 


;IS IT A RANDOM XON? 


027506 


001002 








BNE 


30$ 


.-BRANCH IF NO 


027510 


005726 








TST 


(SP) + 


.-CLEAN RANDOM XON OFF STACK 


027512 


000002 








RTJ 




.-RETURN 


C27514 








30$: 




(SP).#3 




027514 


021627 


000003 






CMP 


;IS IT A CONTROL C? 


027520 


001007 








BNE 


1$ 


.-BRANCH IF NO 


027522 


104401 


030620 






TYPE 


,$CNTLC 


.-TYPE A CONTROL-C CO 


027526 


004737 


027422 






JSR 


PC,$TKINT 


;INIT THE KEYBOARD 


027532 


005726 








TST 


(SP) + 


.-CLEAN UP STACK 


027534 


000137 


030662 






JMP 


SHUT 


.-CONTROL C RESTART 


027540 


021627 


000007 




1$: 


CMP 


(SP).#7 


;IS IT A CONTROL G? 


027544 


001004 








BNE 


2$ 


.-BRANCH IF NO 


027546 


022737 


000176 


00H54 




CMP 


#SWREG.$WR 


;IS SOFT-SWR SELECTED? 


027554 


001500 








BEQ 


6$ 


;G0 TO SWR CHANGE 


027556 








2$: 








027556 


022717 


000001 


027412 




CMP 


#1,$TKCNT ;;IS THE QUEUE FULL? 


027564 


001004 








BNE 


3$ ; .-BRANCH IF NO 


027566 


104401 


001212 






TYPE 


,$8ELL ; .-RING THE TTY BELL 



CZRMQBO RMOS/V2 DSKLS J ^ 2 
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n37C73 

Uc > 1' c 


nnc 73a 

UU J ' CO 










f CD W 

5$ 




H37C 7/. 
Uc f 1 1 «• 


nrwv ci 
UUUs 5 I 








BO 
On 




i"\37C7<. 


■T3 1 A.37 
Uc 1 OC f 


UUUUc 3 




31 : 




\ jr 1 / , »CJ , 




Uc ' OUc 


nni n3i 

UU I Uc I 








B'Mt 


T3t 

3c > , 




Uc ( ous 


nncr>77 


i ci 7cr 








at c 

al> i K j , 


• n T CADI C TTV VQflAOf\ f fcl T C ODi lt> T C 


UC r O I U 


JUJ'CO 








T CT 


t CD ) ♦ 




Uc 'Dl£ 


1 nc777 
1 U3 iff 


1 C 1 XL 3 




3 ' » - 


T C TO 


WISj ; 


. wf\ I l r UK ft I nftn 


H37A1 A 
Uc ' D I O 


1 UU jf J 








QDI 


X1 1 

j 1 1 , 


• 1 HOD IHUTfl T TC TUCDC 

; L UUr 1 J L I lo 1 Mt Kt 


Uc ' OcU 


1 1 77£A 
1 1 f f SO 


1 C 1 






MDVB 

nuvo 


' 1 77 ( CD 1 
w i. 1 f f , \ ir > , 




n37A3£ 


fM. 371 A 
U*»cr I O 


i f f ouu 






BIT 
□ J I. 


■ MAk'C fT 7 . n f T ACT I f 

;nftist ji refill AM.JJ 


Uc ' D3U 


n33A37 
UccOc f 


UUUUc 1 






r mo 


I CD ) 4 #31 


, J j i 1 ft L UfV 1 nUL U : 


UC r QJ** 


nni 7aa 

UU I JDO 








pjup 

LVXC 


71 1 

■3 1* < 


.(SKftNLn Jr IMU 


Uc f D JO 


m?777 

U I c ' f 1 


nnm nn 

UUU I UU 


1 1 ^1 L 

* J l D *• 




nuv 


#mn a<Trc • 


•OPPMADl C TTV rPVOHADh (MTCDDllDTC 


Uc r 0*«H 


nnnnn3 

UUVUUc 








DT I 




• DP Ti IDKJ 
t KC 1 UKN 


uc ' o*»o 


nns?77 


Uc ' *♦ ! c 




x?t- 


i INI. 




•milWT TUIC ruADATTPD 
.(.UUrVl lnl5 tnftnftl,ICn 


Uc » OJc 


n?i ap7 
uc i oc f 


UUU 1 "*U 








rcDi #1^.0 


• fC TT IIDDPD fACP - ? 


UC ' D ->D 


UUchU J 








ni t 


4$ 


•ooAwru fp vpc 


UC r DDU 


UC 1 OC r 


nnm 75. 

UUU I f J 








(SP),*17S ; 


, l J 11 ft 5rT t J ftL I rVW : 


027664 


003002 








BGT 


4$ 


'BRANCH IF YES 


C27666 


042716 


0C00A0 






BIC 


#40. (SP) 


;MAXE IT UPPER CASE 


027672 


112677 


177516 




4$: 


M0V8 


<SP)*,aSTKQlN 


;AN0 PUT IT IN QUEUE 


027676 


005237 


027414 






INC 


STKQJN 


; UPDATE THE POINTER 


027702 


023727 


027414 


027421 




CMP 


STKQIN.#ST<QEND ; 


;G0 OFF THE END? 


027710 


001003 








BNE 


5S 


.•BRANCH IF NO 


027712 


C12737 


027420 


0274 U 




MOV 


»$TKQSRT,STK0IN ; 


.-RESET THE POINTER 


0277^0 


000002 






5$: 


RTI 


.•RETURN 



027722 
027730 
027732 
027736 
027740 
027744 
027750 
027754 



022737 
001124 
105777 
100121 
1 1 7746 
042716 
021627 
001300 



000176 0CH54 SCKSWR: 

151222 

151216 
1 77600 
000007 



•SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
•ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 
•SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP 
•CALL WHEN OPERATING IN TT Y INTERRUPT MODE. 



CMP 
BNE 

TST8 

BPL 

M0V8 

BIC 

CMP 

BNE 



'SWREG.SWR 
15$ 
iSTKS 
15$ 

a$TKB,-<SP) 
# A C1 77, (SP) 
(SP) # #7 
2$ 



IS THE S0FT-SWR SELECTED 

EXIT IF NOT 

IS A CHAR WAITING? 

IF NOT. EXIT 



YES 
MAKE IT 
IS IT A 
IF NOT. 
AND EXIT 



7-BIT ASCII 
C0NTR0L-G? 
PUT IT IN THE 



TTY QUEUE 



•CONTROL IS PASSED TO THIS POINT FROM EITHER THE TTY INTERRUPT SERVICE 
•ROUTINE OR FROM THE SOFTWARE SWITCH REGISTER TRAP CALL. AS A RESULT OF 



027756 


123727 


001150 


000001 


6$: 


CMPB 


$AUT08.#1 


• ; ARE WE RUNNING IN AUTO-MODE? 


027764 


001674 








BEQ 


2$ 


• ; BRANCH IF YES 


027766 


005726 








TST 


(SP>* 


•.•CLEAR CONTROL -G OFF STACK 


027770 


004737 


027422 






JSR 


PC.$TKINT 


• ; FLUSH THE TTY INPUT QUEUE 


02777i, 


005077 


151160 






CLR 


a$TKS 


•.•DISABLE TTY KEYBOARD INTERRUPTS 


030000 


112737 


000001 


001151 




M0V8 


#1.$INTAG 


;SET INTERRUPT MODE INDICATOR 


030006 


104401 


030632 






TYPE 


,$CNTLG 


•;ECHC THE CONTROL -G (*G) 


030012 


104401 


030637 




$GTSWR: 


TYPE 


,$MSWR 


; T YPE CURRENT CONTENTS 


030016 


07 3746 


0001 76 






MOV 


SWREG.-(SP) 


.•SAVE SWREG FOR TYPE OUT 


C 30022 


104402 








TYP0C 


;G0 TYPE— OCTAL ASCII (ALL DIGITS) 



CZR"WBO RM05/3/2 DSKLS TST 2 MACRO V04.00 4-APR-81 
TTY INPUT ROUTINE 



030024 


104401 


030650 






TrPE 


030030 


005046 






'9$: 


CLR 


U jUU3£ 


UU5U46 










U5UU5*« 


1 AC 777 

105' f r 


1 CI 1 Trt 

l 5 1 1 <:U 




7* . 

1 9 : 


T C TO 

i b iy 




1 UU jtj 








DDI 




1 1 77/ A 


15 1 Ms 










n/ 571/, 


1 77/.r\n 
I f 'oUU 






q f r 


030052 


021627 


000003 






CW 


ninncA 
U 3UU jo 


nm m c 

UU lull 








CVMC 


030060 


104401 


030620 






TYPE 


n*nnAA 
U jUUOh 


Uoc'UO 


uuuuuo 








U 3UU f u 


1 3?757 


UU 1 I 3 I 


UUUUU 1 




r MOD 




nni nni 
UU i uu j 










n xn 1 nn 
U 3U I uu 


ni 5777 


UUU 1 uu 


i^i nc 3 

I 3 I U3c 




nUV 


030106 


000137 


030662 




8$: 


J MP 


r7m 1 3 
UjU I l c 


f151 A57 
Uc I DC' 


noon 5 c 

UUUUc5 








C\\t\\ 1 A 
U jU I I o 


nni nns 

UU 1 UU5 








BMP 


nxm 5n 

UjU I cU 




nmA5^ 

U jUOc 3 






T VDP 

1 rrc 


n?m pa 

U JU I C«t 


nA57nA 

UOc ' UO 


uuuuuo 




3nt • 
cU» . 




n?m 7n 

UjU I jU 


nnn7?7 

UUU' J ' 








DO 
OK 


n^ni 7? 


n51 A57 
Uc 1 Oc ' 


UUUU 1 3 








UjU I JO 


UU I Ucc 










n?m ah 

U JU I *• u 


nnc 7 aa 

UU J ' DO 


uuuuu*» 






T CT 


n^m aa 

UjU I l t<i 


fW"P AH7 
UU i *tUJ 








□CU 


nvn aa 

UjU I «tO 


ni AA77 
U 1 OO' ' 


\J\JV\J\JC 


151 nnn 

1 3 1 UUU 




MOW 

nuv 


a xni 5a 
u ju > j** 


OA57nA 
UOc f UO 


uuuuuo 




111- 


Ann 


nvn An 

UjU I DU 


i riAAm 

1 Uh*»U 1 


nm 51 7 

UU I c I ' 




I •«# . 


T VDC 


nxm aa 

UjU I o** 


1 5X757 

I CJr C r 


nm 1 5.1 

UU I I 3 I 


nnnnm 

UUUUU 1 






riTni 75 
UjU 1 r c 


(V\1 A/1? 
UU 1 UU J 








PAlF 


UjU I 1 *t 


ni 5777 
U 1 c' r ' 


nnni nn 

UUU I uu 


1 5n75A 
1 3U' 30 




MOW 

nuv 


n?npnp 

UjUcUc 


UUUUUc 






1 5* ■ 

I 5* . 


n 1 i 


n*n 5oa 


<TrtA7<7 
UU*» r jf 


Uc 5 I uu 




1 AC - 


ICQ 


U JUc I U 


051 A57 
Uc 1 Oc f 


nnnnAf) 
uuuuou 






r MP 

LIT 


U JUc I *t 


no 5 A 50 
UUc*»cU 








Ql T 


U JUc ID 


051 A57 
Uc 1 Oc ' 


nnnnA7 

UUUUO f 






Lit" 


n?n555 


fk0701 C 
UUjU I 5 








or t 
Ou 1 


nVJ55A 
U jvcc*» 


OA575A 
U*»c' cO 


uuuuou 






air 


UjUc jU 


nnc 7aa 

UU J ' OO 


VWKJVc 






TCT 

1 J 1 


UjvCJH 


noi aox 

UU I *»Uj 








orn 
ocu 


U JUc JO 


ooa?i a 

UvO J I o 








ACt 


030240 


006316 








A5I 


030242 


006316 








ASL 


030244 


005266 


000002 




17$: 


INC 


030250 


056616 


1 77776 






BIS 


030254 


000667 








8R 


030256 


104401 


001216 




18$: 


TYPE 


030262 


000720 








BR 










.DSA8L 


LS8 
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.SMNEW ; ; PROMPT FOR NEW SWR 

-(SP) ;; CLEAR COUNTER 

-(SP) ; ; THE NEW SWR 

3$TKS ;;CHAR THERE? 

7$ ;;IF NOT TRY AGAIN 

a$TKB.-(SP) ;;PICK UP CHAR 

#*C17/.(SP) ; ;MAKE IT 7-8IT ASCII 

(S'" J ).#3 ;;JS IT A CONTR0L-C? 

9$ ; ; BRANCH IF NOT 

.SCNTLC ;;YES, ECHO C0NTR0L-C ( A C) 

#6.SP ; .-CLEAN UP STACK 

$INTAG.#1 ; ; RE ENABLE TTY KEYBOARD INTERRUPTS? 

8$ ;; BRANCH IF NO 

#100.a$TKS ; ; ALLOW TTY KEYBOARD INTERRUPTS 

SHUT ;;C0NTR0L-C RESTART 



(SP),#25 ;;IS IT A CONTROL -U? 

10$ ; ; BRANCH IF NOT 

,$CNTLU ;;YES, ECHO CONTROL -U CU) 

#6.SP ;; IGNORE PREVIOUS INPUT 

19$ ;;LET*S TRY IT AGAIN 



(SP),*15 ;;JS IT A <CR>? 

16$ ; ."BRANCH IF NO 

<(SP) ;;Y£S. IS IT THE FIRST CHAR? 

11$ ; .'BRANCH IF YES 

2(SP).aSWR ;;SAVE NEW SWR 

#6.SP ;;CLFAR UP STACK 

.$CRLF ;;ECH0 <CR> AND <LF> 

$INTAG.#1 ;;RE-ENABLE TTY KBD INTERRUPTS? 

15$ ;. -BRANCH IF NOT 

#10C.a$TKS ;. -RE-ENABLE TTY KBD INTERRUPTS 

' -RETURN 

PC,$TYPEC ;;ECH0 CHAR 

(SP). #60 ;;CHAR < 0? 

18$ ;. -BRANCH IF YES 

(SP).#67 ;;CHAR > 7? 

18$ ; .'BRANCH IF YES 

#60. (SP)* ;; STRIP-OFF ASCII 

2(SP) ;;IS THIS THE FIRST CHAR 

17$ ;. -BRANCH IF YES 

(SP) ;;N0. SHIFT PRESENT 

(SP) ;; CHAR OVER TO MAKE 

(SP) ;; ROOM FOR NEW ONE. 

2(SP) ;;KEEP COUNT OF CHAR 

-2(SP).(SP) ;;SET IN NEW CHAR 

7$ ;;G£T THE NEXT ONE 

,$QUES ;;TYPE ?<CRXLF> 

20$ ;; SIMULATE CONTROL -U 
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•THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE T T V 
•CALL: 



SEO 0128 



RDCHR 

RETURN HERE 



GET A CHARACTER FROM THE QUEUE 
CHARACTER IS ON THE STACK 
WITH PARI TV BIT STRIPPED Off 



050<:d4 


01 l oho 






• Cft r Lift . 




(SP) ,-(SP) 


• 


. oi icu ftni mi rue or Ann 
PUbn DUWN Tnt rC AND 


KJ JVC DO 


\J t DODO 


vWvv 1 * 








4(SP).2(SP) 




' THE PS 


030274 


005066 


000004 






ClR 


4 CP) 




•GET READY FOR A CHARACTER 


030300 


005046 








CLR 


-(SP) 


# 


;PUT NEW PS ON STACK 


030302 


012746 


030310 






MOV 


#64$. -(SP) 


• 


;PUT NEW PC ON STACK 


030306 


000002 








RTI 




# 


;P0P NEW PC AND PS 


030310 








64$: 










030310 


005737 


027412 




1$: 


TST 


$TKCNT 


# 


;WAIT ON A CHARACTER 


0303K 


001 775 








BEtf 


1$ 






030316 


005337 


027412 






DEC 


$TKCNT 


# 


.•DECREMENT THE COUNTER 


030322 


117766 


1 77070 


000004 




M0V8 


a$TKQ0UT.4(SP) 


• 


;GET ONE CHARACTER 


030330 


005237 


027416 
027416 






INC 


$TKOOUT 


# 


; UPDATE THE POINTER 


C30334 


023727 


027421 




CMP 


$TKQOUT.#$TKQEND 


;;DID IT GO OFF OF THE END? 


030342 


001003 








BNE 


2$ 


f 


; BRANCH IF NO 


030344 


012737 


027420 


027416 




MOV 


#$TKOSRT,$TKQOUT 


;;RESET THE POINTER 


030352 


000002 






2S: 


RTI 




# 


; RE TURN 



030354 
030356 
030360 
030364 
030370 
030372 
030374 
030376 
030402 
030404 
030406 
C3O410 
030416 
030422 
030426 
030430 
030434 
030436 
030442 
030446 
030450 
030452 
030454 
030462 
030466 
030470 
C 304 74 



010346 
005046 
012703 
022703 
101456 
104411 
112613 
122713 
001022 
005716 
001007 
112737 
104401 
012716 
005303 
020327 
103434 
111337 
104401 
000746 
005716 
001406 
112737 
104401 
005016 
122713 
001003 



030610 
030620 



000177 



0001 34 
030606 
177777 

030610 

030606 
030606 



000134 
030606 

000025 



•THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
•CALL: 

• RDLIN 

RETURN HERE 



$RDL IN: 

1$: 

2$: 



10$: 



030606 



030606 



6$: 



5$: 



7$: 



MOV R3.-(SP) 

CLR -(SP) 

MOV #$TTYlN,R3 

CMP #$TTYIN*8..R3 

BLOS 4$ 

RDCHR 

M0V8 (SP)*,(R3) 

CMP8 #1 77. (R3) 

BNE 5$ 

TST (SP) 

BNE 6$ 

M0V8 #'\,9$ 

TYPE ,9$ 

MOV #-1.(SP) 

DEC R3 

CMP R3,#$TTYIN 

BLO 4$ 

M0V8 (R3).9$ 

TYPE .9$ 

BR 2$ 

TST (SP) 

BEQ 7$ 

M0V8 #'\,9$ 

TYPE ,9$ 

CLR (SP) 

CMP8 #25, (R3) 

BNE 8$ 



INPUT A STRING FROM THE TTY 

ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
TERMINATOR WILL BE A BYTE OF ALL O'S 



SAVE P3 

CLEAR THE RU80UT KEY 
GET ADDRESS 
BUFFER FULL? 
BR IF YES 

GO READ ONE CHARACTER FROM THE TTY 
GET CHARACTER 
IS IT A RUBOUT 
BR IF NO 

IS THIS THE FIRST RUBOUT? 
BR IF NO 

TYPE A BACK SLASH 

SET THE RUBOUT KEY 
BACKUP BY ONE 
STACK EMPTY? 
BR IF YES 

SETUP TO TYPEOUT THE DELETED CHAR. 
GO TYPE 

GO READ ANOTHER CHAR. 
RUBOUT KEY SET? 
BR IF NO 

TYPE A BACK SLASH 

CLEAR THE RUBOUT KEY 
IS CHARACTER A CTRL U? 
BR IF NO 
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030476 


104401 




030502 


000726 




030504 


122713 




030510 


001011 




030512 


105013 




030514 


104401 




030520 


104401 




030524 


00071 7 




030526 


104401 




030532 


000712 




030534 


111337 




030540 


104401 




030544 


122723 




030550 


001305 




030552 


105063 




030556 


104401 




030562 


005726 




030564 


012603 




030566 


011646 




C30570 


016666 




030576 


012766 




030604 


000002 




030606 


000 




030607 


000 




030610 






030620 


136 




030625 


136 




030632 


136 




030637 


015 




030650 


040 


2 

3 


030662 


005737 


4 


030666 


001002 


5 


030670 


000137 


6 


030674 


005037 


7 


030700 


000137 
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ST 2 
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03062 - 






TYPE 


, SCNTLU 






BR 


1$ 


000022 




8S: 


CMP8 


#22. (R3) 






BNE 


3$ 








CLR8 


(R3) 


001217 






TYPE 


,$CRL F 


030610 






TYPE 


,$T T Y IN 






BR 


2$ 


001216 




4$: 


TYPE 


, $QUE S 








BR 


1$ 


030606 




3S: 


MOVB 


(R3) ,9S 


030606 






TYPE 


,9S 


000015 






CMP8 


#15. (R3)* 








BNE 


2S 


M7777 






CLRB 


-1 (R3) 


001220 






TYPE 


,SLF 








TST 


(SP) ♦ 








MOV 


(SP) *,R3 








MOV 


(SP) .-(SP) 


0C0004 


000002 




MOV 


4(SP) ,2(SP> 


030610 


000004 




MOV 


#STT YIN. 4 (SP) 








RTJ 








9$: 


.BYTE 


0 








• BYTE 


0 






iTTYIN • 


.BLKB 


8. 

/*C/<15><12> 


103 


015 


SCNTLC: 


.ASCIZ 


125 


015 


SCNTLU: 


•ASCIZ 


/ U/<15>< i2> 


107 


015 


SCNTLG: 


.ASCIZ 


/*G/<15><12> 


012 


123 


SMSWR: 


.ASCIZ 


<15><12>/SWR = 


040 


116 


SMNEW: 


.ASCIZ 


/ NEW = / 






.EVEN 






000042 




SHUT: 


TST 


S#42 








BNfc 




002732 






JMP 


START 


001300 




IS: 


CLR 


SDEVM 


021332 






JMP 


SEOP 



4 



SEO 0129 



TYPE A CONTROL "U" 

GO START OVER 

IS CHARACTER A " A R" 7 

BRANCH If NO 

CLEAR THE CHARACTER 

TYPE A "CR" £ 'IF" 

TYPE THE INPUT STRING 

GO PICKUP ANOTHER CHACTER 

TYPE A 

CLEAR THE BUFFER AND LOOP 
ECHO THE CHARACTER 

CHECK FOR RETURN 

LOOP IF NOT RETURN 

CLEAR RETURN (THE 15) 

TYPE A LINE FEED 

CLEAN RUBOUT KEY FROM THE STACK 

RESTORE R3 

;ADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 

.RETURN 

; STORAGE FOR ASCII CHAR. TO TYPE 
r TERMINATOR 

; RE SERVE 8 BYTES FOR TTY INPUT 
; CONTROL "C" 
; CONTROL '\J" 
CONTROL "Q" 



ANY MONITOR PRESENT ? 
BR IF YES 
GO TO START 

FUDGE NO DRIVES IN MAP 
RETURN TO »EOP 
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SEO 0130 



. S8TTL READ AN OCTAL NUMBER FROM THE TTV 



•THIS ROUTINE WJLL READ AN OCTAL (ASCII) NUMBER FROM THE TTV AND 
•CHANGE IT TO BINARY. 



•CALL: 



RDOCT 

RETURN HERE 



;;READ AN OCTAL NUMBER 

;;LOW ORDER BITS ARE ON TOP OF THE STACK 

;;HIGH ORDER BITS ARE 'N $HI0CT 



0 50 7(j^ 


01 16*i6 




5RD0C T : 


MAW 


\Sr) ,-lirJ 


• •DDAV/lnC CDATE CAD TUf 

;;rHUViPt orMlfc r UK IHt 


05U f Uo 


uloooo 


AAAAA/ 
UUUUU*> 


AAAAAO 


MAW 


/ f CD > J/CPl 


• • 1 MDI IT kU MQCO 

• -DIICU DO AM CTATk' 


U5U' l*» 


A1 AA/ 4. 






MAW 


on - t CD 1 




UlUIso 






MAW 


D1 _ C CD \ 


, ,rU3n K 1 LhM SIMLA 


U5U/VU 


A1 no/ 






MAW 


DO — { CD > 


• -DIICU D3 AAi CTAfk' 


A1A70 3 


1 n; / i i 
1 U*»*» 1 C 




1 C - 
1 9 . 


orii ! M 
KULliM 




-•DEAD AM ACT 1 7 1 fWC 










MAW 

nuv 


KDU DA 


• -cct Annoccc ac 1ct ruioir rco 


A7A70A 


AACAA1 






LLn 


D1 


• -pi pad data unort 

• •LLC Mn l/M I M wUn y 


A1A71A 








v LH 








1 1 3A/ A 




5* . 
C» . 




/DAW 


.."JLAUr into LMMAMt I Cn 




\J\J 1 H 1 C 






BFC 




• • IF ZERO GET OUT 

00*1 tLny UL ■ • 


030736 


006301 






ASL 


R1 


;;*2 


030740 


006102 






ROL 


R2 




030742 


006301 






ASL 


R1 


;;*4 


030744 


006102 






ROL 


R2 




030746 


006301 






ASL 


R1 


;;*8 


030750 


006102 






ROL 


R2 




030752 


042716 


177770 




BIC 


#-C7 # (SP) 


;; STRIP THE ASCII JUNK 


030756 


062601 






ADD 


(SP)*.R1 


;;ADD IN THIS DIGIT 


030760 


000764 






BR 


2% 


;;L00P 


030762 


005726 




3$: 


TST 


(SP) + 


;; CLEAN TERMINATOR FROM STACK 


030764 


010166 


000012 




MOV 


R1J2(SP> 


;;SAVE THE RESULT 


030770 


010237 


031004 




MOV 


R2. SHI OCT 




030774 


012602 






MOV 


<SP)*.R2 


;;POP STACK INTO R2 


030776 


012601 






MOV 


<SP)*.R1 


;;P0P STACK INTO RI 


031000 


012600 






MOV 


<SP)*,R0 


;;P0P STACK INTO R0 


031002 


000002 






RTI 




* 'RETURN 


031004 


000000 




$HJ OCT: 


.WORD 


0 


••HIGH ORDER BITS GO HERE 



TRAP DECODER 



SEO 0131 



.S8TTL TRAP DECODER 



031006 
031012 
031016 
031022 
031 024 
031026 
031032 
031034 
031036 
031040 
031044 



016646 
042716 
012746 
000002 
010046 
016600 
005740 
111000 
006300 
016000 
000200 



000002 
000020 
031024 



000002 



031060 



•THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
•AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
•OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
•GO TO THAT ROUTINE. 



STRAP: MOV 
BJC 
MOV 
RTI 

1$: MOV 
MOV 
TST 
M0V8 
ASL 
MOV 
RTS 



2(SP).-(SP) 
020. (SP) 
#1$.-(SP) 

RO.-(SP) 

2(SP).R0 

-(RO) 

(RO).RO 

RO 

$TRPAD(RO),RO 
RO 



ASSUME THE STATUS OF 
THE CALLER — DO NOT ALLOW 
T-8IT TRAPS 

SET THE NEW STATUS 

SAVE RO 

GET TRAP ADDRESS 

BACKUP BY 2 

GET RIGHT BYTE OF TRAP 

POSITION FOR INDEXING 

INDEX TO TABLE 

GO TO ROUT HE 



;;THIS IS USE TO HANDLE THE "GETPRI" MACRO 



031046 011646 

031050 C16666 000004 000002 
031056 000002 



031060 
031062 
031064 
031066 
0310/0 
031072 
031074 



031100 
031102 
031104 
031106 
031110 
031112 



031046 
024666 
024464 
024440 
024500 
024214 
024140 



031076 030012 



027722 
030264 
030354 
030704 
024044 
024102 



STRAP2: MOV 
MOV 
RTI 



(SP).-(SP) 
4(SP).2<SP) 



;;MOVE THE PC DOWN 
;;MOVE THE PSW DOWN 
; .'RESTORE THE PSW 



. S8TTL TRAP TABLE 



.••THIS TABLE CONTAINS THE STARTJN6 ADDRESSES OF THE ROUTINES CALLED 
.•8Y THE "TRAP" INSTRUCTION. 



STRPAD: 



ROUTINE 

.WORD 

STYPE 

STYPOC 

STYPOS 

$TYPON 

$TYPDS 

STYPBN 



STRAP2 
:CAIL=TYPE 
;CALL=TYPOC 
CALL -TYPOS 
;CALL=TYPON 
;CALL=TYPDS 
:CALL=TYP8N 



TRAP*1( 104401) 
TRAP*2( 104402) 
TRAP*3( 104403) 
TRAP*4( 104404) 
TRAP*5( 104405) 
TRAP*6< 104406) 



TTY TYPE OUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING 2ER0S) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TYPE OCTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 
TYPE BINARY (ASCII) NUMBER 



SGTSWR ;;CALL=GTSWR TRAP*7( 104407) GET SOFT-SWR SETTING 



SCKSWR ; 
SRDCHR ; 
SRDLIN ; 
SRDOCT ; 
SSAVREG ; 
SRESREG ; 



CALL = 
CALL: 
CALL: 
CALL: 
§ALL : 
CALL: 



CKSWR 

RDCHR 

RDLIN 

RDOCT 

SAVREG 

RESREG 



TRAP*10(104410) 
TRAP+11 (104411) 
TRAP*12(104412) 



TEST FOR CHANGE IN SOFT-SWR 
TTY TYPEIN CHARACTER ROUTINE 
TTY TYPEIN STRING ROUTINE 
TRAP*13(104413) READ AN OCTAL NUMBER FROM TTY 
TRAP+14O04414) SAVE R0-R5 ROUTINE 
TRAP*15(104415) RESTORE R0-R5 ROUTINE 
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.SBTTL POWER DOWN AND UP ROUTINES 



: POWER DOWN ROUTINE 

031 IK 012737 031254 000024 SPWRDN: MOV #$IlLUP.a#PWRVEC 

031122 012737 000340 000026 MOV *340.a*PWRVEC*2 

031130 010046 MOV RO.-(SP) 

031132 010146 MCV R1.-(SP) 

031 134 010246 MOV R2.-(SP) 

031136 010346 MOV R3.-(SP) 

03*140 010446 MOV R4.-(SP) 

031142 010546 MOV R5,-(SP) 

031144 017746 150004 MOV iSWR.-(SP) 

031150 010637 031260 MOV SP.SSAVR6 

031154 012737 031166 000024 MOV *$PWRUP,a*PWRVEC 

031162 000000 HALT 

031164 000776 BR .-2 



;SET FOR FAST UP 
PRI0.-7 

PUSH RO ON STACK 
PUSH R1 ON STACK 
PUSH R2 ON STACK 
PUSH R3 ON STACK 
PUSH R4 ON STACK 
PUSH R5 ON STACK 
PUSH 9SUR ON STACK 
SAVE SP 
;SET UP VECTOR 

HANG UP 



*»**»*»*»**»»»*»»»*»»**»*•*»»**»»**»*»»»»»»»»*»»»*»***»****»**• 



; POWER UP ROUTINE 



031166 


012737 


031254 


000024 


fPWRUP: 


MOV 


#SILLUP,a#PWRVEC 


;;SET FOR FAST DOWN 


031174 


013706 


031260 






MOV 


SSAVR6.SP 


;GET SP 


031200 


005037 


03*260 






CLR 


SSAVR6 


;WAIT LOOP FOR THE TTV 


031204 


005237 


031260 




1$: 


INC 


SSAVR6 


.-WAIT FOR THE INC 


031210 


001375 








BNE 


1S 


;0F WORD 


031212 


012677 


147736 






MOV 


(SP)*.aswR 


.POP STACK INTO 3SWR 


031216 


012605 








MOV 


(SP)*. R5 


.-POP STACK INTO R5 


031220 


012604 








MOV 


(SP) *,R4 


;POP STACK INTO R4 


031222 


012603 








MOV 


(SP)+.R3 


.POP STACK INTO R3 


031224 


012602 








MOV 


(SPJ+.R2 


;POP STACK INTO R2 


031226 


012601 








MOV 


(SP)*. R1 


;POP STACK INTO R1 


031230 


012600 








MOV 


(SP)*. RO 


;POP STACK INTO RO 


031232 


012737 


031114 


000024 




MOV 


#$PWRDN,a#PWRVEC 


;;SET UP THE POWER DOWN VECTOR 


031240 


012737 


000340 


000026 




MOV 


#340,a#PWRVEC*2 . 


;PRI0:7 


031246 


104401 








TYPE 




REPORT THE POWER FAILURE 


031250 


031262 






SPWRMG: 


.WORD 


SPOWER 


; POWER FAIL MESSAGE POINTER 


031252 


000002 








RTI 






031254 


000000 






SILLUP: 


HALT 




• ; THE POWER UP SEOUENCE WAS STARTED 


031256 


000776 








BR 


.-2 '. 


; BEFORE THE POWER DOWN WAS COMPLETE 


031260 


000000 
015 






$SAVR6: 


0 




;PUT THE SP HERE 


031262 


012 


120 


SPOWER: 


.ASCI2 
.EVEN 


<1 5><1 2>' "POWER" ' 
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SEQ 0133 



,S8TTL APT COMMUNICATIONS ROUTINE 



031272 


112737 


000001 


031536 


» • 

SATY1 : 


M0V8 


#1.$FFLG 


;;T0 REPORT FATAL ERROR 


031300 


112737 


000001 


031534 


SATY3: 


M0V8 


#1.$MFLG 


;;T0 TYPE A MESSAGE 


031 306 


000403 








BR 


SATYC 




0313.0 


112737 


000001 


031536 


$ATY4: 


M0V8 


#1.$FFLG 


;;T0 ONLY REPORT FATAL ERROR 


031316 








SAT YC : 






031316 


010046 








MOV 


RO.-(SP) 


;;PUSH RO ON STACK 


031 320 


010146 








MOV 


R1,-(Sn 


;;PUSH R1 ON STACK 


031322 


105737 


031534 






TST8 


SMFLG 


;; SHOULD TYPE A MESSAGE? 


031 326 


00H50 








8F0 


5$ 


;;IF NOT: BR 


031330 


122737 


000001 


001242 




CMP8 


#APTENV.$ENV 


;; OPERATING UNDER APT? 


031336 


001031 








BNE 


3$ 


;;IF NOT: BR 


031 340 


132737 


000100 


001243 




BIT8 


*APTSPOOL.$ENVM 


;; SHOULD SPOOL MESSAGES? 


031346 


001425 








BEQ 


3$ 


;;IF NOT: BR 


031350 


01 7600 


000004 






MOV 


34(SP).R0 


;;GET MESSAGE ADDR. 


031354 


062766 


000002 


000004 




ADD 


*2.4(SP) 


;;8UMP RETURN ADDR. 


031362 


005737 


001222 




1$: 


'ST 


SMSGTYPE 


;;SEE IF DONE W/ LAST XMISSIC* 


C31366 


001 375 








BNE 


1$ 


;;IF NOT: WAIT 


031 370 


010037 


001236 






MOV 


RO.SMSGAD 


;;PUT ADDR IN MAIL80X 


031 374 


105720 






2$: 


TST8 


(R0) + 


;;FIND END OF MESSAGE 


031376 


001376 








BNE 


2$ 


03K00 


163700 


001236 






sue 


SMS GAD, RO 


;;SU8 START OF MESSAGE 


031404 


006200 








ASR 


RO 


;;GET MESSAGE LNGTH IN WORDS 


031406 


010037 


001240 






MOV 


RO.SMSGLGT 


;;PUT LENGTH IN MAIL80X 


031412 


012737 


000004 


001222 




MOV 


*4. SMSGTYPE 


; ; TELL APT TO TAKE MSG. 


031420 


000413 








BR 


5$ 


;;PUT MS'G ADDR IN JSR LINKAGE 


031422 


017637 


000004 


031446 


3$: 


MOV 


54(SP).4$ 


031430 


062766 


000002 


000004 




ADD 


*2.4(SP) 


;;8UMP RETURN ADDRESS 


031436 


01 3746 


177776 






MOV 


1 77776. -(SP) 


;;PUSH 177776 ON STACK 


031442 


004737 


024666 






JSR 


PC. ST YPF 


;;CALL TYPE MACRO 


031446 


000000 






4$: 


.WORD 


0 




031450 








5$: 








031450 


105737 


031536 




10$: 


TST8 


SFFLG 


;; SHOULD REPORT FATAL ERROR'' 


031454 


001416 








BEQ 


12$ 


;;IF NOT: BR 


031456 


005737 


001242 






TST 


SENV 


.-.•RUNNING UNDER APT? 


031462 


001413 








BEO 


12$ 


;;JF NOT : BR 


031464 


005737 


001222 




11$: 


TST 


SMSGTYPE 


; ; FINISHED LAST MESSAGE? 


031470 


001375 








BNE 


11$ 


;;IF NOT: WAIT 


031472 


017637 


000004 


001224 




MOV 


34(SP).$FATAL 


;;GET ERROR # 


C31500 


062766 


000002 


000004 




ADD 


#2,4(SP) 


;;BUMP RETURN ADDR. 
; ; TELL APT TO TAKE ERROR 


031506 


005237 


001222 






INC 


$MSGTYPE 


031512 


105037 


031536 




12$: 


CLR8 


$FFLG 


;; CLEAR FATAL FLAG 


031516 


105037 


031535 






CLP8 


$LFLG 


; ; CLEAR LOG FLAG 


031522 


105037 


031534 






CLR8 


$MFLG 


;; CLEAR MESSAGE FLAG 


031 526 


012601 








MOV 


(SP)*.R1 


;;POP STACK INTO R1 


031530 


012600 








MOV 


(SP)*.RO 


;;POP STACK INTO RO 


031532 


000207 








RTS 


PC 


;; RE TURN 


031534 


000 






SMFLG: 


.BYTE 


0 


;;MESSG. FLAG 


031535 


000 






SLFLG: 


.8YTE 


0 


;;LOG FLAG 


031536 


000 






SFFLG: 


• 8YTE 
.EVEN 


0 


;; FATAL FLAG 



000200 
000001 
000100 
000040 



APTSIZE = 200 
APTENV = 001 
APT SPOOL = 100 
APT C SUP = 040 



fZRMQBO RM05/V2 DSKLS 
'ONSOLE MESSAGES 



2 
3 


031540 


075 


4 


031 542 


101 


5 


031547 


040 


6 


031553 


054 


7 


031556 


200 


8 


031607 


200 


9 


031617 


040 


10 


031661 


122 


1 1 


031670 


040 


'2 


031724 


200 


3 


03201 1 


200 


14 


032066 


200 


15 


032067 


040 


16 


032110 


200 


17 


032137 


116 


IS 


032144 


200 


19 


032160 


104 


20 


C32166 


200 


21 


032204 


122 


22 


032211 


122 


23 


032216 


122 


24 


032223 


040 


25 


032244 


040 


26 


032261 


040 


27 


032276 


040 


28 


032315 


040 


29 


032326 


040 


30 


032336 


116 


31 


032340 


1 31 


12 


032342 


040 


33 


032343 


040 


34 


032344 


040 


35 


032345 


040 


36 







ST 2 MACRO V04.00 4 







.S8TTL 


000 




EQUALS: 


1 '4 


114 


ALL: 


077 


040 


QUES: 


040 


oco 


COMMA: 


124 


131 


MSHELP: 


122 


115 


CNSL01 : 


114 


111 


CNSL02: 


115 


126 


CNSL03: 


114 


111 


CNSL04: 


124 


131 


CNSL07: 


101 


116 








CNSL08: 


077 


111 


CNSL09: 


104 


122 


DRIVES: 


11 7 


116 


NONE: 


104 


122 


MSDRVS : 


122 


1 1 1 


MSGDRV : 


125 


116 


SYSTAT: 


115 


060 


SRM02 : 


115 


060 


$RM03: 


115 


060 


WM05: 


116 


1 1 7 


NOTRM: 


114 


1 1 7 


LODEV: 


116 


1 1 7 


NOTPRS : 


116 


1 1 7 


NOTAVL : 


117 


106 


UNTOFF : 


1 1 7 


116 


UN TON: 


000 




N: 


000 




Y: 






BLNKS4 : 






BLNKS3: 






BLNKS2: 


000 




BLNKS1 : 






.EVEN 



E 1 2 
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CONSOLE MESSAGES 



SfO 0134 



.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 

• ASCI 
.ASCI 

• ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 



aALL3<CRLF> 

a ? a 

<CRLF>iTYPE HELP TEXT (L> N ? a 
<CRLF>3RMCS1=a 

a LIMITS - L0= 160000, HI= 17XXXX3<CRLF> 
3RMVEC=a 

a LIMITS - L0= 0. HI= 10003<CRLFXLF> 

<CRLF>aTYPE "A" TO TEST ALL DRIVES, OR TYPE DRIVE NUMBER ( S)i 
<CRLF>3AND TERMINATE INPUT WITH A CARRIAGE RE TURN". 3 
<CRLF> 

a 7ILLEGAL INPUT3<CRLF> 
<CRLF>/DRIVE(S) TO BE TESTED/ 
/NONE/ 

<CRLF>/DRIVE(S): / 
/DRIVE/ 

<CRLF>/UNIT STATUS:/ 

/RM02/ 

/RM03/ 

/RM05/ 

a NOT AN RM05/3/23 

/ LOAD DEVICE/ 

/ NOT PRESENT/ 

/ NOT AVAILABLE/ 

/ OFFLINE/ 

/ ONLINE/ 

/N/ 

/Y/ 

/ / 

/ / 

/ / 

/ / 



F 11 
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FUNCTION CODE TABLE SEO 01 5S 

1 .SBTTL FUNCTION CODE TABLE 
2 

3 ; THE FUNCTION CODE TABLE IS USED TO DEFINE STATUS CONDITIONS FOR 

4 .-EACH FUNCTION CODE . BIT USAGE IS AS FOLLOWS: 
5 

6 ; ATA - BIT 15 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

7 ;IF ATA SHOULD BE SET WHEN THE FUNCTION CODE IS EXECUTED, OTHERWISE, 

8 ;8IT 15 IS ZERO. INDICATING THAT ATA SHOULD NOT NORMALLY BE SET. 

9 .-NOTE THAT ATA MAY BE SET WHEN A COMMAND IS EXECUTED EVEN THOUGH 
10 ;IT IS NOT EXPECTED AS A RESULT OF THE COMMAND. 

11 

12 ; WCE - BIT H IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

13 ;IF WRITE CHECK ERRORS ARE ENABLED AS A FUNCTION OF THE COMMAND. 
14 

15 ; OPI - BIT 13 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

16 ;IF OPI ERRORS ARE ENABLED DURING THE EXECUTION OF THAT COMMAND. 
17 

18 ; IVC - BIT 12 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

19 ;IF IVC ERRORS ARE ENABLED DURING THE EXECUTION OF THAT COMMAND. 
20 

21 ; WLE - BIT 11 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

22 ;IF WRITE ERRORS ARE ENABLED DURING THE EXECUTION OF THAT COMMAND. 

23 ; THE WRITE ERRORS WHICH ARE ENABLED ARE *V/LE", 'V/CF". "DPE", '\PE". 
24 

25 ; IAE - BIT 10 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

26 ;JF INVALID ADDRESS ERROR IS ENABLED FOR THAT COMMAND. 
27 

28 ; AOE - BIT 09 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

29 ;IF READ AND WRITE ERRORS ARE ENABLED DURING THE EXECUTION OF THE 

30 .-COMMAND. THE ERRORS ENABLED BY THIS BIT ARE "TRE", "DLT", 'MEM". 

31 ;'NXF". "L8T". AND 'AOE". 
32 

33 ; BJT 08 IS NOT USED. 
34 

35 ; HCE - BIT 07 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

36 ;IF HEADER ERRORS ARE ENABLED DURING THE EXECUTION OF THAT COMMAND. 

37 .-HEADER ERRORS INCLUDE "HCRC", 'HCE". 'TER", AND "BSE". 
38 

39 ; ECH - BIT 06 IS SET IN THE ENTRY FOR A GIVEN FUNCTION CODE 

40 ;IF DATA FIELD ERRORS ARE ENABLED DURING THE EXECUTION OF THAT 

41 ; COMMAND. THESE ERRORS INCLUDE 'WDPE", "DCK". AND "ECH". 
42 

43 ; BIT 05 IS NOT USED. 
44 

45 ; BIT 04 IS NOT USED. 
46 

47 ; BIT 03 IS NOT USED. 
48 

49 ; BIT 02 IS NOT USED. 
50 

51 ; BIT 01 IS NOT USED. 
52 

53 ; ILF - BIT 00 IS SET IF THE FUNCTION CODE IS ILLEGAL. 
54 

55 032350 FNCDT8: .-FUNCTION CODE TABLE 

56 

57 032350 020000 .WORD OPI ;NOP 
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SEO 0136 



58 032352 

59 032354 

60 032356 

61 032360 

62 032362 

63 032364 

64 032366 

65 032370 

66 032372 

67 032374 

68 032376 
o9 032400 

7 0 032402 

71 032404 

72 032406 

73 032410 

74 032412 

75 032414 

76 032416 

77 C32420 

78 032422 

79 032424 

80 032426 

81 032430 

82 032432 

83 032434 

84 032436 

85 032440 

86 032442 

87 032444 

88 032446 



130001 

1 32000 

130000 

020000 

030000 

i 30000 

1 30000 

020000 

020000 

130001 

130001 

1 32000 

130001 

1 30001 

130001 

130001 

1 30001 

1 30001 

130001 

073300 

073300 

130001 

130001 

037200 

C37000 

130001 

130001 

033300 

033300 

1 30001 

130001 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
• WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



OP I .ATA. ILF 
ATA.OPI.IVC 
ATA!0PJ.IVC 
OP I 

OPI.JVC 
OPI.'ATA.JVC 
OPI! ATA !IVC 
OP I 
OPI 
OPI 
OPI 
ATA 
OPJ 
OPI 
OPJ 
OPJ 
OPJ 
OPJ 
OPJ 
WCE 
WCE 
OPJ 
OPJ 
OPJ 
OPJ 
OPJ 
OPJ 
OPJ 
OPJ 
OPI 
OPJ 



.'IVC 
MAE 



ATA 




1 JVC 

• ill 


ATA 


ILF 


1 IVC 

• J H 


OPI 




1 IAE 


ATA 


ILF 


1 JVC 


ATA 


ILF 


'JVC 

4 » l 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 


OPJ 


IVC 


MAE!AOE!HCE!ECH 


OPJ 


IVC 


MAE!AOE!HCE!ECH 


ATA 


ILF 


MVC 


ATA, 


ILF 


MVC 


JVC. 


WLE 


MAEIAOE.'HCE 


IVC 


WLE 


MAEJAOE 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 


JVC 


IAE 


!AOE!HCE!ECH 


IVC 


IAE 


!AOE!HCE!ECH 


ATA 


ILF 


MVC 


ATA 


ILF 


MVC 



ILLEGAL FUNCTION (2) 
SEEK 

RECALI8RATE 
DRIVE CLEAR 
RELEASE 
OFFSET 

RETURN TO CENTERL I NE 
READ IN PRESET 
PACK ACKNOWLEDGE 
ILLEGAL FUNCTION (24) 
ILLEGAL FUNCTION (26) 
SEARCH 

ILLEGAL FUNCTION (32) 
ILLEGAL FUNCTION (34) 
ILLEGAL FUNCTION (36) 
ILLEGAL FUNCTION (40) 
ILLEGAL FUNCTION (42) 
ILLEGAL FUNCTION (44) 
ILLEGAL FUNCTION (46) 
WRITE CHECK DATA 
WRITE CHECK HEADER AND DATA 
ILLEGAL FUNCTION (54) 
ILLEGAL FUNCTION (56) 
WRITE DATA 

WRITE HEADER AND DATA 
ILLEGAL FUNCTION (64) 
ILLEGAL FUNCTION (66) 
READ DATA 

READ HEADER AND DATA 
ILLEGAL FUNCTION (74) 
ILLEGAL FUNCTION (76) 



Z^MQBO RM05/3/2 DSKlS T ST 
"ENUON (ATA) TAB'.E 



Q32450 
032451 
032452 
032453 
032454 

8 032455 

9 032456 
C 032457 
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.S8TTL ATTENTION (ATA) TABLE 



00 1 
002 
004 
010 
020 
040 
100 
200 



ATNTBL 



.EVEN 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



1. 
2. 
4. 

8. 

16. 

32. 

64. 

123. 



SCO 013/ E 
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S£0 01 ?8 



1 
2 
3 
4 
5 
6 
7 



033460 
032466 
032500 
0325K 
032522 

8 032534 

9 032544 
10 032556 
V 032564 

12 032576 

13 032602 

14 0326^ 

15 032624 

16 032632 

17 032646 

18 032654 

19 032664 

20 C32672 

21 032702 

22 032710 

23 032720 

24 032726 

25 032736 

26 032744 

27 032754 

28 032762 

29 032772 

30 033000 

31 033010 

32 033016 

33 033026 

34 033042 

35 033050 

36 033064 

37 033072 

38 033106 

39 033116 

40 033132 

41 033142 

42 033156 

43 033166 

44 033200 

45 033206 

46 033222 

47 033232 

48 033240 

49 033252 

50 033260 

51 033270 

52 033300 

53 033304 

54 033314 

55 033320 

56 033326 

57 033332 



047'51 

047167 

052427 

047167 

052427 

047151 

052427 

047167 

052427 

047415 

047167 

052427 

047167 

052427 

047^61 

052427 

047561 

052427 

047561 

052427 

047561 

052427 

047561 

052427 

047561 

052427 

047561 

052427 

047561 

052427 

045142 

052427 

045142 

052427 

045277 

052427 

045277 

052427 

045277 

052427 

045277 

052427 

047167 

052427 

047770 

050143 

052427 

050143 

052427 

047151 

052427 

045602 

052427 

045602 

052427 



040562 
047212 
051633 
047257 
052150 
047212 
052020 
047334 
052020 
000000 
047257 
052020 
047453 
051773 
047602 
051773 
047602 
051773 
047622 
051773 
047622 
051773 
047642 
051773 
047642 
051773 
047662 
051773 
047662 
051773 
050101 
052070 
050124 
052070 
050404 
052070 
050404 
052070 
050521 
052070 
050101 
052070 
047257 
052070 
047504 
045277 
052070 
045602 
052070 
C46541 
051773 
051016 
052115 
051422 
052115 



.S8TTL ERROR MESSAGE TABLE 

000000 EMT1: .WORD EMS300,EMS1 ,0 

047237 EMT2: .WORD EMS301 ,EMS302.EMS303,EMS1 ,EMS304 

051773 .WORD EMS51 1 ,EMS500,EMS501 ,EMS502,EMS503,0 

047212 EMT3: .WORD EMS301 .EMS306.EMS302 

051773 .WORD EMS51 1 ,EMS505,EMS501 ,EMS502,0 

047273 EMT4: .WORD EMS300,EMS302,EMS307,EMS2 

051773 .WORD EMS51 1 ,EMS502,EMS501 ,EMS503,0 

047351 EMT5: .WORD EM3301 ,EMS310,EMS31 1 

051773 .WORD EMS51 1 .EMS502.EMS501 ,EMS503,EMS504 

.WORD EMS312.0 

047351 EMT6: .WORD EMS301 ,EMS306,EMS31 1 

051773 .WORD EMS51 1 .EMS502.EMS501 ,EMS503,EMS504,0 

047212 EMT7: .WORD EMS301 .EMS313.EMS302 

052020 .WORD EMS51 1 ,EMS501 ,EMS502,EMS504, EMS 503,0 

047504 EMTIO: .WORD EMS316,EMS31 7,EMS314 

052020 .WORD EMS51 1 ,EMS501 ,EMS502,0 

047533 EMT11: .WORD EMS316.EMS317.EMS315 

052020 .WORD EMS51 1 ,EMS501 ,EMS502,0 

047504 EMT12: .WORD EMS316.EMS320,EMS314 

052020 .WORD EMS51 1 ,EMS501 ,EMS502,0 

047533 EMT13: .WORD EMS316,EMS320,EMS315 

052020 .WORD EMS51 1 .EMS501 ,EMS5O2.0 

047504 EMT14: .WORD EMS316.EMS321 .EMS314 

052020 .WORD EMS511,EMS501,EMS502,0 

047533 EMT15: .WORD EMS316.EMS321 ,EMS315 

052020 .WORD EMS51 1 ,EMS501 .EMS502.0 

047504 EMT16: .WORD EMS316,EMS322.EMS314 

052020 .WORD EMS511.EHS501,FMS502,0 

047533 EMT17: .WORD EMS316.EMS322,EMS315 

052020 .WORD EMS51 1 ,EMS501 ,EMS502,0 

050157 EMT20: .WORD EMS 71 . EHS335 , EMS340 . EMS 72 , EMS377 . EMS 372 

000000 .WORD EMS511.EMS503,0 

050157 EMT21: .WORD EMS71 , EMS336, EMS340 , EMS72 , EMS400 , EMS372 

000000 .WORD EMS511,EMS503,0 

045347 EMT22: .WORD EMS73.EMS352,EMS74.EMS402,EMS70.EMS406 

052115 .WORD EMS511,EMS503,EMS504,0 

045422 EM T 23: .WORD EMS73,EMS352,EMS75,EMS402,EMS77,EMS406 

052115 .WORD EMS511.EMS503,EMS504.0 

045422 EMT24: .WORD EMS73,EMS356,EMS75.EMS402,EMS77,EMS377 

052115 .WORD EMS511,EMS503.EMS504.0 

050157 EMT25: .WORD EMS73,EMS335,EMS340.EMS76.EMS41 1 

000000 .WORD EMS511,EMS503,0 

046541 EMT26: .WORD EMS301 ,EMS306.EMS252,EMS253,EMS327.EMS°54 

051773 .WORD EMS51 1 ,EMS503,EMS501 ,EMS502 

000000 .WORD EMS330,EMS3H.O 

051376 EMT27: .WORD EMS337.EMS73,EMS410,EMS76.EMS41 1 

000000 .WORD EMS511,EMS503.0 

050170 EMT30: .WORD EMS337.EMS100,EMS341 .EMS101 

052115 .WORD EMS511,EMS503, EMS 504,0 

EMT31: .WORD EMS300.EMS252 

052070 .WORD EMS51 1 ,EMS501 ,EMS503.0 

EMT32: .WORD EMS100.EMS370 

000000 .WORD EMS511,EMS504.0 

EMT33: .WORD EMS100.EMS412 

000000 .WORD EMS 5 11, EMS 504,0 
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SEO 0139 



58 033340 

59 033344 
033352 
033356 
033364 

63 033376 

64 033404 
033420 
033426 

67 033434 

68 033450 
o9 033456 

033472 
033476 
033504 

73 033514 

74 033522 

75 033530 

76 033536 

77 C33546 

78 033554 

79 033560 

80 033570 

81 033576 

82 033604 

83 033614 

84 033622 
35 033632 

86 033640 

87 033646 

88 033654 

89 033664 

90 033672 

91 033700 

92 033706 

93 033716 
033724 
033734 

96 033742 

97 033750 

98 033756 

99 033762 

100 033772 

101 033776 

102 034006 

103 034016 
034024 
034034 



60 
61 
62 



65 
66 



^0 
71 
72 



94 
95 



104 
105 

106 034042 

107 034046 

108 034054 

109 034062 

110 034070 

111 034074 

112 034102 

113 034110 
034116 



'14 



0457^6 


051422 




EMT34 : 


.WORD 


052427 


G52070 


000000 




.WORD 


045716 


050124 




EMT35 : 


.WORD 


052427 


052070 


AAT AAA 

000000 




.WORD 


A i f / a ~\ 

045602 
052427 


Af ai ai 

050101 


AC A 1 C *7 

0501 57 


rur 7/ 

EMT56: 


.WORD 


Af ^4 « r 

052115 


000000 




.WORD 


045602 


050101 


050157 


riiT77 

EMT37: 


.WORD 


051435 


046024 


AC1 / / "7 

051467 




.WORD 


052427 


052115 


000000 




.WORD 


045602 


050124 


Af ai g~ -y 

0501 57 


EMT40: 


.WORD 


052427 


Am 1 c 

0521 1 5 


AAAAAA 

000000 




1 I API A 

.WORD 


A / r / a a 

045602 


050124 


ACA1 C "7 

0501 57 


PUT / 1 . 

EMT41 : 


.WORD 


045716 


AC 1 "51 T- 

051212 






.WORD 


052427 


052115 


AAAAAA 

000000 

A/ 77Z ^ 

OA 7 foe 




.WORD 


r\jr m 


AC 1 


EMT4<>. 


i i a a r\ 

.WORD 


AC ~\l 1~7 

052427 


AC 

052070 


AAAAAA 

000000 




.WORD 


051450 


A/ Z A T / 

046024 


A C 1 C 1 "7 

051 51 7 


EMT43: 


.WORD 


AC ^/ 

052427 


AC 1 1 1 C 

0521 1 5 


AAAAAA 

000000 




i tAAr\ 

.WORD 


A / / AC1 


AC 1 117 

051227 


A/ "7"7>£ 1 

047/62 


put / / 

EM T 44 : 


.WORD 


052427 


AC *iA7A 

052070 


AAAAAA 

000000 




I lAH P\ 

.WORD 


A/ 71 C 1 

047 1 51 


A/ L. C 7/ 

046374 




CUT / C . 

EMT43 : 


.WORD 


AC 1/ 17 


AC 1 777 

031 //3 


AC 1A7A 

U320/0 




.WORD 


046 11<: 


AC 1117 

051227 


AC 1 C 1 7 

03l 31 7 


CUT / £. . 

EM 146. 


. WORD 


AC 1/ 17 


AC 1A7A 

03<:0/0 


AAAAAA 
000000 




. WORD 


AC 1 / 7 C 

0t> . 433 


A/ Z. 1 C 7 

0461 3/ 


AC 1 C7C 

03 1333 


CMT/ 7 . 

EMT4/ : 


1 (ADA 

.WORD 


ftf 1/ 17 

052427 


AC 11 1 C 

0521 1 3 


AAAAAA 
000000 




. WORD 


A/ £ 1 £ 7 

04616/ 


AC 1 / 7C 

031433 


AC1 777 

031 335 


CMT CA • 


.WORD 


AC 1/ 17 


03<:0/0 


AAAAAA 

000000 




.WORD 


0j0231 


A/ 1 1Z. 

046<;<:6 


AC1 CCA 

03l 330 


CMT C 1 . 

EMI 3l : 


1 ^70f\ 

.WORD 


AC "5/ "57 


AC11 1 C 

0V1 1 3 


AAAAAA 

000000 




.WORD 


AC 1 / CA 

031430 


AC 1 C AZ. 

03l 306 


A/ L. 1 C 7 

0461 3/ 


EMI 3<r: 


.WORD 


nCO; 17 


AC 11 1 C 

03<ri 1 3 


AAAAAA 

000000 




1 ^1>A 

.WORD 


AC AA/\7 

03000/ 


A/ A7/ 7 
040/4/ 


A/ Z 771 

046/3<: 


CMT C7 . 

EMT33: 


. WORD 


AC 1/ 17 

05<:4<:/ 


AC 1 777 

03 1 / f 3 


AAAAAA 

000000 




.WORD 


A/ £ "7/ / 

046<:44 


AC 1 / TC 

031433 


AC 1 777 

03l 333 


EMF34 


.WORD 


AC1/ "77 

052427 


AC 1A7A 

032070 


AAAAAA 

000000 




.WORD 


A/ Z 7A1 

046302 


AC 1 117 

051227 


A/ 77/ 1 

047/62 


CUT C C . 

EMT55 • 


.WORD 


AC 1/ 17 


AC 1A7A 

03^070 


AAAAAA 
000000 




1 M*^Af\ 

.WORD 


f.iL. 7/ 1 

046341 


AC1 117 

03l<:<:/ 


AC 1 C 1 7 

03l 3l / 


CMT CZ . 

EMT36: 


I *AAr\ 

.WORD 


AC1/ 17 

052427 


AC 1A7A 

052070 


AAAAAA 

000000 




.WORD 


A/ /7Z7 

046762 


AC AA77 

050037 




r mt c 7 . 

EM13/: 


.WORD 


AC "7/ "77 


AC1007 


AC 1 777 

03 1 773 




.WORD 


A/ 1 AAA 
041000 


ACAAC C 

030033 




EM 160: 


.WORD 


AC 1/ 17 


AC 11i/ 

03<r*:&4 


AC 1 777 

031 1 / 5 




.WORD 


AC1 / 7C 

051433 


A/ L. 1 A7 

046407 


AC 1 C 7C 

03 1 353 


ryT/ 1 . 

EMI61 : 


.WORD 


AC 1/ 1 7 


AC 11 1 C 

03<:l 13 


AAAAAA 

000000 




.WORD 


050322 


A/ CiAl 

043602 


ACA1 7 A 

0301 70 


ryr / 1 

EMT6<: : 


.WORD 


rtCly 17 
0324*?/ 


AC 11 1 C 

0521 1 3 


AAAAAA 

000000 




.WORD 


A/ 7A7 

04630*: 


AC 1 A77 

051033 




PUT/ 7 . 

LMT63: 


.WORD 


AC?/ 37 
U3c*»C / 


nc3n7n 

\JJC\Jf\J 






unDA 
. mVnl> 


051435 


046424 


050420 


EMT64: 


.WORD 


052427 


052115 


000000 




.WORD 


051565 


050420 




EMT65 : 


.WORD 


052427 


052115 


000000 




.WORD 


041321 


050124 


050177 


EMT66: 


.WORD 


052427 


051773 


000000 




.WORD 


047151 


041050 




EMT67: 


.WORD 



EMS 102 
EMS511 
EMS 102 
EMS511 
EMS 100 
EMS511 
EMS 100 
EMS413 
EMS511 
EMS 100 
EMS511 
EMS 100 
EMS 102 
EMS511 
EMS 103 
EMS511 
EMS414 
EMS511 
EMS 105 
EMS511 
EMS300 
EMS511 
EMS 106 
EMS511 
EMS413 
EMS511 
EMS110 
EMS511 
EMS343 
EMS511 
EMS414 
EMS511 
EMS331 
EMS511 
EMS112 
EMS511 
EMS113 
EMS511 
EMS114 
EMS511 
EMS257 
EMS511 
EMS5,. 
EMS511 
EMS413 
EMS511 
EMS 346 
EMS511 
EMS113 
EMS511 
EMS413 
EMS511 
EMS422 
EMS511 
EMS12, 
EMS511 
EMS 300 



EMS412 
EMS503.0 
EMS336 
EMS503.0 
EMS335.EMS340 
EMS504.0 
EMS335.EMS340 
EMS104,EMS4 , 5 
EMS504.0 
EMS336.EMS340 
EMS504.0 
EMS336.EMS340 
EMS400 
EMS504,0 
EMS401 ,EMS327 
EMS503,0 
EMS104,EMS417 
EMS504.0 
EMS401.EMS327 
EMS503,0 
EMS253 

EMS501.EMS503 
EMS401.EMS417 
EHS503.0 
EMS107.EMS420 
EMS504.0 
EMS413,EMS405 
EMS503,0 
EMS111.EMS421 
EMS504.0 
E«S416,EMS107 
E"S504,0 
EMS4-EMS256 
EMS501.0 
EMS413.EMS405 
EMS503.0 
EMS401.EMS327 
EMS503,0 
EMS401.EMS417 
EMS503.0 
EMS3 7 2 

EMS506.EMS501 
S333 

EMS507,EMS501 
EMS115.EMS420 
EMS504.0 
EMS100,EMS341 
EMS504.0 
EMS371 
EMS503.0 
EMS116.EMS353 
EMS 504,0 
EMS353 
.EMS 504.0 
EMS336.EMS342 
EMS501 ,0 
EMS6 



EM 



,EMS10?.EMS334 
,EMS102,EMS377,EMS365 

,EMS416,EMS104,EMS415 
,EMS73,EMS415,EMS402 

,EMS370 

,EMS370 
.0 

,EMS417 
,EMS107 

,EMS421 

,EMS607 
.EMS37G 

.0 
.0 

.EMS417 
,EMS101 



CZRMQBO RM05/3/2 DSK.LS TST 
ERROR MESSAGE TABLE 



MACRO V04.00 



K 11 

4-APR-81 01 :?9:56 PAGE 39-? 



SEO 0140 



n5 

117 

118 

119 

120 

121 

122 

123 

124 

125 

'26 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 



034122 
034126 
034134 
034144 
034154 
034170 
034200 
034214 
034224 
034234 
034244 
034254 
034260 
034266 
034274 
034302 
034310 
034316 
034330 
C34336 
034346 
034356 
034362 
034370 
034402 
034406 
034414 
034424 
034434 
034444 
034454 
034466 
034472 
034500 
034510 
034520 
034534 
034542 
034554 
034562 
034572 
034602 
034620 
034626 
034642 
034650 
034662 
034666 
034674 
034704 
034714 
034724 
034734 
034746 
034752 
034760 
034770 



052427 

041114 

0471 51 

052427 

041050 

052427 

041050 

052427 

047167 

052427 

050231 

047151 

052427 

050322 

052427 

050143 

052427 

047167 

052427 

050322 

052427 

050143 

052427 

047167 

052427 

041446 

050322 

052427 

050143 

052427 

047167 

052427 

041652 

050322 

052427 

041713 

052427 

041713 

052427 

050143 

052427 

050143 

052427 

041713 

052427 

047167 

052427 

041713 

050322 

052427 

050143 

052427 

047167 

052427 

042103 

050322 

052427 



051773 

050055 

041050 

051773 

050101 

051773 

050124 

051773 

047016 

051773 

050245 

041377 

052070 

041377 

052070 

041377 

052070 

047453 

052070 

041446 

052070 

045074 

052070 

047453 

052070 

050037 

041652 

052070 

041652 

052070 

047453 

052070 

050037 

041713 

052070 

050366 

051773 

050071 

051773 

041713 

052070 

041713 

051773 

050404 

051773 

047453 

052070 

050037 

042103 

052070 

042103 

052070 

047453 

052070 

050037 

042240 

052070 



.WORD EMS511 .EMS501 

000000 .WORD EMS7.EMS333.0 

047762 EMT70: .WORD EMS300.EMS6.EMS327.EMS7 

052115 .WGRD EMS511 .EMS501 .EMS504.0 

050157 EMT71: .WORD EMS6,EMS335.EMS340,EMS10,EMS333,EMS342 

052020 .WORD EMS51 1 .EMS501 .EMS 502,0 

050157 EMT72: .WORD EMS6.EMS336.EMS340.EMS10.EMS334.EMS342 

C52020 .WORD EMS511.EMS501.EMS502.O 

047237 EMT73: .WORD EMS301.EMS260.EMS303.EMS11 

052020 .WORD EMS511.EMS501.FMS502.0 

050177 EMT74: .WORD EMS343.EMS344 .EMS342.0 

EMT75: .WORD EMS300.EMS13 

000000 .WORD EMS511.EMS503.0 

050274 EMT76: .WORD EMS346.EMS13.EMS345 

000000 .WORD EMS511 .EMS503.0 

050274 EMT77: .WORD EMS337.EMS13.EMS345 

000000 .WORD EMS511.EMS503.0 

046627 EMT100: .WORD EMS301 .EMS313.EMS254.EMS347.EMS13 

000000 .WORD EMS511.EMS503.0 

050170 EMT101: .WORD EMS346.EMS14.EMS341 .EMS15 

051773 .WORD EMS51 1 .EMS503.EMS501 ,0 

EMT102: .WORD EMS337.EMS70 

000000 .WORD EMS511.EMS503.0 

046627 EMT103: .WORD EMS301 ,EMS313.EMS254,EMS347,EMS15 

.WORD EMS 5 11. EMS 503 

000000 .WORD EMS14,EMS332,0 

050170 EMT104: .WORD EMS346.EMS17.EMS341 .EMS16 

051773 .WORD EMS51 1 .EMS503.EMS501 .0 

050170 EMT105: .WORD EMS337.EMS17.EMS341 .EMS16 

051773 .WORD EMS51 1 .EMS503.EMS501 .0 

046627 EMT106: .WORD EMS301 ,EMS313.EMS254.EMS347.EMS16 

.WORD EMS511.EMS503 

000000 .WORD EMS 1 7. EMS332.0 

050170 EMT107: .WORD EMS346,EMS20.EMS341 ,EMS21 

051773 .WORD EMS511,EMS503,EMS501.0 

041757 EMT110: .WORD EM520.EMS351 .EMS21 ,EMS350,EMS22,EMS31 5 

000000 .WORD EMS51 1 .EMS501 .0 

050361 EMT111: .WORD EMS20.EMS334.EMS350,EMS22,EMS333 

000000 . WORD EMS51 1 . EMS501 ,0 

050170 EMT112: .WORD EMS337.EMS20.EMS341 ,EMS21 

051773 .WORD EMS51 1 ,EMS503.EMS501 .0 

050170 EMT113: .WORD EMS337,EMS20,EMS341 .EMS21 .EMS350.EMS22.EMS334 

000000 .WORD EMS51 1 .EMS501 ,0 

041757 EMT114: .WORD EMS20, EMS352, EMS21 .EMS350.EMS22.EMS333 

000000 . WORD EMS 51 1 . EMS501 . 0 

046627 EMT115: .WORD EMS301 .EMS313.EMS254.EMS347.EMS21 

.WORD EMS511.EMS503 

000000 .WORD EMS20.EMS332.0 

050170 EMT116: .WORD EMS346.EMS23-EMS341 .EMS2A 

051773 .WORD EMS51 1 .EMS503.EMS501 .0 

050170 EMT117: .WORD EMS337.EMS23.EMS341 .EMS24 

051773 .WORD EMS51 1 .EMS503.EMS501 .0 

046627 EMT120: .WORD EMS301 .EMS313.EMS254.EMS3A7.EMS24 

.WORD EMS511.EMS503 

000000 .WORD EMS23.EMS332.0 

050170 EMT121: .WORD EMS346.EMS25.EMS341 .EMS26 

051773 .WORD EMS511 .EMS503.EMS501 .0 



CZRMQBO RM05/?/«^ DSKLS T ST 2 
ERROR MESSAGE TABLE 



MACRO V04.00 4-APR-81 01 



L 11 

29:56 PAGE 39-3 



172 035000 
'73 035010 

174 035020 

175 035032 

176 035036 

177 035044 

178 035054 

179 035062 

180 035070 

181 035074 

182 035102 
133 035112 

184 035120 

185 035132 

186 035136 

187 035144 

188 035152 

189 035162 

190 035170 

191 C35200 

192 035212 

193 035220 

194 035232 

195 035240 

196 035246 

197 035254 

198 035264 

199 035272 

200 035276 

201 035304 

202 035314 
205 035322 

204 035334 

205 035342 

206 035350 

207 035356 

208 035366 

209 035374 

210 035402 

211 035410 

212 035424 

213 035432 

214 035446 

215 035454 

216 035462 

217 035472 

218 035476 

219 035504 

220 035520 

221 035526 

222 035532 

223 035540 

224 035546 

225 035554 

226 035566 

227 035574 

228 035606 



050143 

052427 

047167 

052427 

042240 

047151 

052427 

050007 

052427 

04 2441 

050143 

052427 

047167 

052427 

042375 

042521 

052427 

042572 

052427 

050477 

052427 

050477 

052427 

050007 

052427 

042731 

052427 

047047 

052427 

047151 

052427 

050477 

052427 

050322 

052427 

050143 

052427 

050660 

052427 

050143 

052427 

043133 

052427 

047167 

052427 

050723 

052427 

050746 

052427 

050143 

052427 

043263 

052427 

050746 

052427 

050746 

052427 



042240 

052070 

047453 

052070 

050037 

042375 

052070 

042375 

052070 

047533 

042375 

052070 

047453 

052070 

050037 

050444 

052115 

050444 

052115 

042652 

052115 

042702 

052115 

040747 

052115 

050541 

051 773 

050637 

052070 

042773 

051773 

043023 

052115 

043055 

052115 

043055 

052115 

047334 

051773 

043133 

051773 

050444 

051773 

047257 

051773 

043201 

052070 

050420 

052070 

042773 

051773 

050444 

051773 

050420 

052070 

050420 

052070 



05O170 EMT122: .WORD EMs537,EMS25,EMS341 .FMS26 

051773 .WORD EMS51 1 .EMS503.EMS501 .0 

046627 EMT123: .WORD EMS301 .EMS313.EMS254.EMS347.EMS26 

.WORD EMS511.EMS503 

000000 .WORD EMS25.EMS332.0 

04727* EMT124: .WORD EMS300.EMS27.EMS307.EMS2 

000000 .WORD EMS511.EMS503.0 

050420 EMT125: .WORD EMS331 .EMS27.EMS353 

.WORD EMS511 .EMS503 

000000 .WORD EMS30.EMS315.0 

050170 EMT126: .WORD EMS337.EMS27.EMS341 .EMS30 

000000 .WORD EMS511.EMS503.0 

046627 EMT127: .WORD EMS301 .EMS313.EMS254.EMS347.EMS30 

.WORD EMS511,EMS503 

000000 .WORD EMS27.EMS332.0 

046437 EMT130: .WORD EMS31 .EMS354.EMS250 

052070 .WORD EMS51 1 .EMS504. EMS 503.0 

046437 EMT131: .WORD EMS32.EMS354.EMS250 

052070 .WORD EMS511.EMS504,EMS503,0 

046437 EMT132: .WORD EMS355.EMS33.FMS250.EMS341 .EMS30 

000000 .WORD EMS511.EMS504.0 

046437 EMT133: .WORD EMS355 . EMS34 , EMS250. EMS34 1 , EMS30 

000000 .WORD EMS511.EMS504.0 

046670 EMT134: .WORD EMS331 .EMS4.EMS255 

000000 .WORD EMS511.EMS504.0 

050563 EMT135: .WORD EMS35.EMS357.EMS360.EMS15 

000000 . WORD EMS5 1 1 , EMS501 . 0 

EMT136: .WORD EMS261 .EMS362 

000000 .WORD EMS511.EMS503.O 

047273 EMT137: .WORD EMS300.EMS36.EMS307.EMS2 

000000 .WORD EMS51 1 .EMS501 .0 

046670 EMT140: .WORD EMS355.EMS37.EMS255.EMS341 .EMS30 

000000 .WORD EMS511.EMS504.0 

050274 EMT141: .WORD EMS346.EMS40.EMS345 

000000 .WORD EMS511.EMS504.0 

050170 EMT142: .WORD EMS337.EMS40.EMS341 .EMS30 

000000 .WORD EMS511.EMS504.0 

043133 EMT143: .WORD EMS363.EMS310.EMS41 

000000 . WORD EMS51 1 . EMS501 , 0 

050170 EMT144: .WORD EMS337.EMS41 .EMS341 ,EMS252. 

000000 .WORD EMS511,EMS501.0 

050675 EMT145: .WORD EMS41 ,EHS354.EMS364.EMS252. 

000000 .WORD EMS511.EMS501.0 

042773 EMT146: .WORD EMS301 , EMS306 . EMS36 

052070 .WORD EMS51 1 .EMS501 ,EMS503.0 

EMT147: .WORD EMS366.EMS42 

000000 .WORD EMS511.EMS503.0 

050716 EMT150: .WORD EMS367.EMS353.EMS365.EMS42.EMS354.EMS3 

000000 .WORD EMS511.EMS503.0 

EMT151: .WORD EMS337.EMS36 

000000 .WORD EMS511.EMS501.0 

042773 FMT152: .WORD EMS43.EMS354.EMS36 

000000 .WORD EMS511.EMS501.0 

050716 EMT153: .WORD EMS367.EMS353.EMS365.EMS36.EMS370 

000000 .WORD EMS511.EMS503.0 

050716 EMT154: .WORD EMS367.EMS353.EMS365.EMS36.EMS371 

000000 .WORD EMS511.EMS503.0 



EMS327.EMS253 
EMS365.EMS253 



CZRMQBO RM05/3/2 DSKIS TST 2 
ERROR MESSAGE TABLE 



MACRO V04.00 



M 11 

4-APR-81 01:29:56 PAGE 39-4 



SEO 014/ 



229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

2*0 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

? r 2 

253 

254 

255 

256 

257 

258 

259 

260 

261 

262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 

281 

282 

283 

284 

285 



035614 
035624 
035632 
035646 
035654 
035664 
035672 
035706 
035714 
035722 
035732 
035740 
035746 
035756 
035772 
036000 
036014 
036022 
036032 
C3603>6 
036046 
036056 
036066 
036100 
036110 
036114 
036122 
036130 
036136 
036144 
036154 
036170 
036176 
036212 
056216 
036224 
036234 
036242 
036252 
036260 
036260 
036270 
036276 
036306 
036314 
036324 
036332 
036344 
036354 
036364 
036374 
036402 
036414 
036430 
036434 
036444 
036452 



047151 

052427 

050746 

052427 

047151 

052427 

050746 

052427 

042731 

047151 

052427 

050143 

052427 

042731 

052427 

043534 

052427 

050143 

052427 

043133 

047151 

052427 

043574 

052427 

050143 

052427 

043574 

052427 

047167 

052427 

050746 

052427 

047151 

050170 

052427 

047151 

052427 

047151 

052427 

050143 
052427 
050322 
052427 
050322 
052427 
050322 
052427 
050322 
052427 
043753 
052427 
050143 
047762 
052427 
044014 
052427 



043334 
052070 
050420 
052070 
043375 
052070 
050420 
052070 
050055 
043452 
052070 
043452 
052070 
050101 
051773 
050101 
051773 
042731 
051773 
050055 
043534 
051773 
050101 
051773 
042731 
051773 
042702 
051773 
047257 
051773 
050420 
051773 
046437 
052526 
051773 
046732 
051773 
046437 
052115 

043712 
051773 
043712 
051773 
043643 
051773 
043712 
052115 
043712 
052115 
050444 
052070 
044014 
040702 
052115 
050444 
051773 



047273 
000000 
050716 
000000 
047273 
000000 
050716 
051773 
000000 
047273 
000000 
050420 
051773 
050143 
000000 
050143 
000000 
047762 

051062 
047273 
052070 
050157 
052070 

000000 
040702 
000000 
043643 
052115 
050716 
000000 
047762 

000000 
050170 
000000 
050170 
000000 

050170 
000000 
050170 
000000 
0501 70 
000000 
050274 
051773 
050170 
051773 
040702 
052020 
051120 

051773 
040702 
000000 



EMT155 
EMT156 
EMT157 
EMT160 

EMT161 
EMT162 
EMT163 
EMT164 
EMT165 

EMT166 
EMT167 
EMT170 
EMT171 
EMT172 
EMT173 
EMT174 

EMT175 

EMT176 

EMT1 77 
EMT200 

EMI 201 

EMT202 

EMT203 

EMT204 

EMT205 

EMT206 

EMT207: 



.WORD EMS300.EMS44,EMS307.EMS2 

.WORD EMS51 I.EMS503.0 

.WORD EMS367.EMS353.EMS365.EMS44.EMS354.EMS3 

.WORD EMS511 .EMS503.0 

.WORD EMS300.EMS45.EMS307.EMS2 

.WORD EMS511,EMS503,0 

.WORD EMS367.EMS353.EMS365.EMS45.EMS354.EMS3 

.WORD EMS511.EMS503.EMS501 

.WORD EMS35.EMS333.0 

.WORD EMS300.EMS46.EMS307.EMS2 

.WORD EMS511 .EMS503.0 

.WORD EMS337.EMS46.EMS353 

.WORD EMS511.EMS503.EMS501.0 

.WORD EMS35.EMS335.EMS337.EMS41 .EMS334.EMS372 

.WORD EMS511,EMS501,0 

.WORD EMS47.EMS335.EMS337.EMS41 .EMS335.EMS372 

.WORD EMS511.EMS501.0 

.WORD EMS337.EMS35.EMS327.EMS47 

.WORD EMS511,EMS501 

.WORD EMS41.EMS333.EMS372.0 

.WORD EMS300.EMS47,EMS307,EMS2 

.WORD EMS511.EMS501.EMS503.0 

. WORD EMS50 . EMS335 . EMS340 . EMS36 . EMS333 

.WORD EMS511.EMS501.EMS503.0 

.WORD EMS337,EMS35 

.WORD EMS511.EMS501.0 

.WORD EMS50.EMS34.EMS3 

.WORD EMS511.EMS501.0 

.WORD EMS301.EMS306.EMS51 

.WORD EMS511,EMS501.EMS504,0 

. WORD EMS367 , EMS353 . EMS365 . EMS47. EMS354 . EMS3 

.WORD EMS511.EMS501.0 

. WORD EMS300 . EMS250 . EMS327 , EMS255 , EMS327 . EMS256 

.WORD EMS341 .EMS600 

.WORD EMS511,EMS501.0 

.WORD EMS300.EMS256,EMS341.EMS600 

.WORD EMS511.EMS501.0 

. WORD EMS300 . EMS250 , EMS34 1 , EMS600 

.WORD EMS511,EMS504,0 

.WORD EMS337,EMS52.EMS341,EMS601 

.WORD EMS511,EMS501,0 

.WORD EMS346.EMS52,EMS341,EMS602 

.WORD EHS511.EMS501,0 

.WORD EMS346,£MS51.EMS341.EMS602 

.WORD EMS511,EMS501,0 

. WORD EMS346 . EMS52, EMS345 , EMS373 , EMS255 

.WORD EMS511,EMS504.EMS501,0 

.WORD EMS346.EMS52,EMS341,EMS27 

.WORD EMS511,EMS504,EMS501,0 

.WORD EMS53,EMS354,EMS3 

. WORD EMS 51 1 , EMS503 , EMS502 , EMS5 10.0 

. WORD EMS337 , EMS54 . EMS374 , EMS250 . EMS327 . EMS255 

.WORD EMS327,EMS3 

.WORD EMS511,EMS504,EMS501,0 

.WORD EMS54,EMS354.EMS3 

.WORD EMS511,EMS5O1,0 



CZRWQBO RM05/3/2 DSKLS 
ERROR MESSAGE TABLE 



T ST 2 MACRO V04.00 



N 11 

4-APR-81 01:29:56 PAGE 39-5 



SEO 0143 



C 

s 



286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

2% 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

540 

341 

34? 



036460 
036470 
036476 
036506 
036514 
036520 
036526 
036544 
036550 
036556 
036562 
036570 
036602 
036610 
036616 
036624 
036632 
036640 
036650 
C36656 
036666 
036674 
036704 
036712 
036722 
036730 
056740 
036750 
036764 
036772 
037002 
037010 
037020 
037026 
037036 
037044 
037052 
037060 
037074 
037102 
037114 
037124 
037142 
037152 
037162 
037172 
037206 
037212 
037224 
037234 
037244 
037260 
037270 
037306 
037314 
037326 
037332 



0440^ 
052427 
044014 
052427 
050143 
052427 
044K.7 
052427 
044147 
050143 
052427 
044242 
052427 
050660 
052427 
050660 
052427 
044453 
052427 
044453 
052427 
044453 
052427 
050322 
052427 
050322 
052427 
044534 
052427 
044534 
052427 
044534 
052427 
044534 
052427 
044534 
052427 
043133 
052427 
050746 
052427 
041571 
052427 
047151 
052427 
044147 
044644 
052427 
047151 
052427 
041513 
052427 
044705 
052427 
051253 
052427 
042773 



050444 050675 EMT210: .WORD EMS54.EMS354,EMS364,CMS250 

052115 000000 .WORD EMS511 .EMS504.0 

050444 050675 EMT211: .WORD EMS54,EMS354.EMS364,EMS255 

052115 000000 .WORD EMSS1 1 ,EMS504,0 

044071 EMT212: .WORD EMS337.EMS55 

052115 000000 .WORD EMS51 1 ,EMS504,0 

050071 0502?4 EMT213: .WORD EMS56.EMS334,EMS345 ,EMS373,EMS262,EMS327,EMS251 

051 73 .WORD EMS511.EMS501 

050101 000000 .WORD EMS56,EMS335,0 

044147 EMT214: .WORD EMS337.EMS56 

051773 000000 .WORD EMS51 1 .EMS501 .0 

050055 050361 EMT215: .WORD EMS57.EMS333.EMS350,EMS6C.EMS334 

051773 000000 .WORD EMS51 1 .EMS501 ,0 

047257 041000 EMT216: .WORD EMS363.EMS306.EMS5 

051773 000000 .WORD EMS51 1 .EMS501 .0 

047257 044400 EMT217: .WORD EMS363.EMS306,EMS61 

051773 000000 .WORD EMS51 1 ,EMS501 .0 

050055 051151 EMT220: .WORD EMS62.EMS333,EMS375,EMS251 

051773 000000 .WORD EMS51 1 .EMS501 .0 

050055 051165 EMT221 : .WORD EMS62.EMS333,EMS376.EMS262 

051773 000000 .WORD EMS511 ,EMS501 ,0 

050055 051165 EMT222: .WORD EMS62,EMS333.EMS376,EMS250 

051773 000000 .WORD EMS51 1 .EMS501 .0 

044453 050170 EMT223: .WORD EMS346,EMS62.EMS341 ,EMS603 

051773 000000 .WORD EMS511 ,EMS501 .0 

044534 051165 EMT224: .WORD EMS346,EMS63,EMS376,EMS262 

051773 052070 .WORD EMS511 .EMS501 ,EMS503,0 

050055 050361 EMT225: .WORD EMS63.EMS333.EMS350,EMS363.EMS310.EMS262 

051773 000000 .WORD EMS511 ,EMS501 ,0 

050541 042773 EMT226: .WORD EMS63.EMS357,EMS36,EMS372 

051773 000000 .WORD EMS511 , EMS 501 ,0 

050521 050563 EMT227: .WORD EMS63.EMS356.EMS360.EMS1 5 

051773 000000 .WORD EMS51 1 .EMS501 .0 

050521 050611 EMT230: .WORD EMS63.EMS356.EMS361 .EMS15 

051773 000000 .WORD EMS511 .EMS501 .0 

050521 043133 EMT231 : .WORD EMS63.EMS356.EMS41 

051773 000000 .WORD EMS51 1 .EMS501 ,0 

051201 050177 EMT232: .WORD EMS4 1 , EMS377 , EMS342 . EMS 365 , EMS63 . EMS 3 32 

051773 000000 .WORD EMS51 1 ,EMS501 ,0 

050420 050716 EMT233: .WORD EMS367.EMS353.EMS365.EMS63.EMS401 

052070 051773 .WORD EMS51 1 .EMS503.EMS501 ,0 

051201 051062 EMT234: .WORD EMS16.EMS377.EMS372.EMS365.EMS64.EMS354.EMS3 

052070 051773 .WORD EMS511 .EMS503.EMS501 ,0 

044644 047273 EMT235: .WORD EMS300,EMS65.EMS307,EMS2 

052020 052070 .WORD EMS51 1 .EMS502.EMS503.0 

051201 051165 EMT236: .WORD EMS56.EMS377.EMS376.EMS252.EMS372.EMS350 

051227 .WORD EMS65.EMS401 

052020 052070 .WORD EMS51 1 .EMS502.EMS503.EMS501 ,0 

044705 047273 EMT237: .WORD EMS300.EMS66.EMS307.EMS2 

051 77j 052070 .WORD EMS511 .EMS501 .EMS503.0 

051212 051062 EM1240: .WORD EMS15.EMS400.EMS372.EMS350.EMS66.EMS401 

052070 051773 .WORD EMS51 1 .EMS503.EMS501 .0 

050124 050157 EMT241: .WORD EMS66,EMS336,EMS340,EMS15.EMS406,EMS405.EMS604 

052070 000000 .WORD EMS511 .EMS5O3.0 

052660 051244 EMT24<>: .WORD EMS403.EMS604.EMS402.EMS21 .EMS377 

052070 .WORD CMS51 1 .FMS503 

050101 000000 .WORD FMS36.EMS335 .0 



ERROR MESSAGE TABLE 



343 037340 

344 037356 

345 037364 

346 037374 
34 7 037402 

348 037412 

349 037420 

350 037432 

35 1 037436 

352 037444 

353 037454 

354 037462 

355 037500 

356 037506 

357 037520 

358 037524 

359 037532 

360 037550 

361 037556 

362 C37566 

363 037574 

364 037604 

365 037612 

366 037624 

367 037630 

368 037636 

369 037646 

370 037654 

371 037672 

372 037700 

373 037712 
37* 037716 

375 037724 

376 037742 

377 037750 

378 037760 

379 037766 

380 037776 

381 040004 

382 040016 

383 040022 

384 040030 

385 040040 

386 040046 

387 040056 

388 04 OC 64 

389 040072 

390 040100 

391 040116 

392 040124 

393 040136 

394 040142 

395 040150 

396 040160 

397 040166 

398 040176 

399 040204 



044705 
052427 
044534 
052427 
042773 
052427 
051253 
052427 
042773 
044762 
052427 
044705 
052427 
051253 
052427 
042773 
044705 
052427 
044534 
052427 
042773 
052427 
051253 
052427 
042773 
044762 
052427 
044705 
052427 
031253 
052427 
042773 
044705 
052427 
044534 
052427 
042773 
052427 
051253 
052427 
042773 
045074 
052427 
044762 
052427 
044705 
052427 
044705 
052427 
051253 
052427 
042375 
042375 
052427 
042375 
052427 
042773 



050124 
C52070 
051227 
052070 
051016 
052070 
052660 
052070 
050101 
050037 
052070 
050124 
052070 
052705 
052070 
050101 
050124 
052070 
051227 
052070 
051016 
052070 
052705 
052070 
050101 
050037 
052070 
050124 
052070 
052723 
052070 
050101 
050124 
052070 
051227 
052070 
051016 
052070 
052723 
052070 
050101 
051227 
052070 
050037 
052070 
050521 
052070 
050124 
052070 
052743 
052070 
050124 
051016 
052070 
051033 
052070 
051514 



050157 
000000 
051333 
000000 
051333 
000000 
051244 

000000 
051333 
000000 
050157 
000000 
051244 

000000 
050157 
000000 
051333 
000000 
051333 
000000 
051244 

000000 
051335 
000000 
050157 
000000 
051244 

000000 
050157 
000000 
051333 
000000 
051333 
000000 
051244 

000000 
051333 
000000 
051333 
000000 
051356 
000000 
050157 
000000 
051244 

000000 
051333 
000000 
051333 
000000 
051333 



EMI 243 
EMT244 
EMT245 
EMT246 

EMT247 
EMT250 
EMT251 

EMT252 
EMT253 
EMT254 
EMT255 

EMT256 
EMT257 
EMT260 

EMT261 
EMT262 
EMT263 
cMT264 

EMT265 
EMT266 
EMT267 
EMT270 
EMT271 

EMT272 
EMT2/3 
EMT274 



.WORD EMS66.EMS336.EMS340.EMS26.EMS404.EMS4C5.EMS60'. 

.WORD EMS511,EMS503,0 

.WORD EMS63.EMS401.EMS405,EMS604 

.WORD EMS511 .EMS503.0 

.WORD EMS36.EMS370.EMS405.EMS604 

.WORD EMS511.EMS503.0 

. WORD EMS403 . EMS604 . EMS402 . EMS24 , EMS377 

.WORD EMS511.EMS503 

.WORD EMS36.EMS335,0 

.WORD EMS67.EMS332.EMS405.EMS604 

.WORD EMS511.EMS503.0 

. WORD EMS66 , EMS336. EMS340 , EMS 1 5 , EMS406 . EMS405 , EMS605 

.WORD EMS511,EMS503,0 

.WORD EMS403.EMS605,EMS402,EMS21 .EMS377 

.WORD EMS511.EMS503 

.WORD EMS36,EMS335,0 

. WORD EMS66 . EMS336. EMS340 . EMS26 . EMS404 . EMS405 . EMS605 

.WORD EMS511.EMS503.0 

.WORD EMS63.EMS401.EMS405,EMS605 

.WORD EMS511.EMS503.0 

.WORD EMS36.EMS370.EMS405.EMS605 

.WORD EMS5 11. EMS 503.0 

. WORD EMS403 . EMS605 . EMS402 . EMS24 . EMS 3 77 

.WORP EMS511.EMS503 

.WORD EMS36.EMS335.0 

.WORD EMS67.EMS332.EMS405.EMS605 

.WORD EMS511,ErS503.0 

. WORD EMS 66 , EMS336 . EMS340 . EMS 1 5 . EMS406 . EMS405 , EMS606 

.WORD EMS511,EMS503.0 

.WORD EMS403.EMS606.EMS402.E;1S21 .EMS377 

.WORD EMS511.EMS503 

.WORD EMS36,EMS335.0 

. WORD EMS 66 , EMS336 . EMS340 . EMS26 . EMS404 . EMS405 , EMS606 

.WORD EMS511.EMS503.0 

.WORD EMS63.EMS401.EMS405.EMS606 

.WORD EMS511,E«503.0 

.WORD EMS36.EMS370.EMS405.EMS606 

.WORD EMS511,EMS503.0 

.WORD EMS403,EMS606,EMS402.EMS24.EMS377 

.WORD EMS511.EMS503 

.WORD EMS36.EMS335.0 

.WORD EMS70,EMS401,EMS405.EMS606 

.WORD EMS511.EMS503.0 

.WORD EMS67.EMS332.EMS405.EMS606 

.WORD EMS511.EMS503.0 

.WORD EMS66.EMS356.EMS407 

.WORD EMS511.EMS503.0 

.WORD EMS66.EMS336.EMS340.FMS1 5. EMS406.EMS405.EMS607 

.WORD EMS511.EMS503.0 

.WORD EMS403.EMS607,EMS402.EMS21 .EMS377 

.WORD EMS511.EMS503 

.WORD EMS27.EMS336.0 

.WORD EMS27.EMS370.EMS405.EMS607 

.WORD EMS511.EMS503.0 

.WORD EMS27,EMS371.EMS4G5.EMS607 

.WORD EMS511,EMS503.n 

.WORD EMS36,tMS404.EMS405,EMS607 



^ZRMQBO RM05/3/2 DSKLS TST 2 
FRROR MESSAGE TABLE 



0402 14 
040222 
040232 
040242 
040252 

405 040260 

406 040276 
040304 
040316 

409 040322 



400 
401 
402 
403 

404 



407 
408 



.10 
41 1 
412 
4'3 



040330 
040340 
040346 
040356 



052427 
043753 
052427 
044762 
052427 
044705 
052427 
051253 
052427 
042375 
045074 
052427 
047151 
052427 



052070 
051227 
052070 
050037 
052070 
050124 
052070 
052743 
052070 
050124 
051227 
052070 
046670 
052115 



MACRO V04.00 



C 12 

4-APR-81 01:29:56 PAGE 19-7 



SEO 0145 



000000 
051333 
052020 
051333 
000000 
050157 
000000 
051244 

000000 
051333 
000000 
050170 
000000 



EMT275 
EMT276 
EMT277 
EMT300 

EMT301 : 
EMT302: 



.WORD EMS511 .EMS503.0 

.WORD EMS53.EMS401,EMS405,EMf607 

.WORD EMS511 ,EMS503.EMS502,0 

.WORD EMS67.EMS332.EMS405.EMS607 

.WORD EMS511,EMS503,0 

.WORD EMS66.EMS336,EMS340.EMS26,EMS404,EMS405.tMS607 

.WORD EMS511,EMS503.0 

.WORD EMS403.EMS607.EMS402,EMS24 # EMS377 

.WORD EMS511,EMS503 

.WORD EM327.EMS336,0 

.WORD EMS70,EMS401,EMS4C EMS607 

.WORD EMS511.EMS503.0 

.WORD EMS300.EMS255.EMS341 .EMS600 

. WORD EMS511.EMS504.0 



ZRWQBO RM05/3/2 DSKLS TST 2 



MACRO V04.00 



D 12 

4-APR-81 01:29:56 PAGE 40 



r RRQR MESSAGE 


fABlE 










1 040364 


052761 


000000 


EHT1 : 


.WORD 


EH1 ,0 


2 040370 


053037 


COOOOO 


EHT2: 


.WORD 


EH2.0 


3 040374 


053054 


000000 


EHT5: 


.WORD 


EH5,0 


4 040400 


053112 


000000 


EHT7: 


.WORD 


EH7,0 


5 040404 


053131 


000000 


EH'47: 


.WORD 


EH47,0 


6 040410 


053157 


000000 


EHT52: 


.WORD 


EH52,0 


7 040414 


053255 


000000 


EHT57: 


.WORD 


EH57,0 


8 040420 


053313 


000000 


EHT61 : 


.WORD 


EH61 .0 


9 040424 


053351 


000000 


EHT65: 


.WORD 


EH65.0 


10 040430 


053425 


000000 


EHT71 : 


.WORD 


EH71 ,0 


11 040434 


053045 


oooooo 


EHT74: 


.WORD 


EH3,0 


12 040440 


053502 


000000 


EHT115 


.WORD 


EH1 15.0 


13 040444 


05>577 


oooooo 


EHT130 


.WORD 


EH130.0 


14 040450 


053715 


oooooo 


EHT i 52 


.WORD 


EH I 5d ,V 


15 040454 


054013 


oooooo 


EHT142 


.WORD 


EH142.0 


16 040460 


054111 


oooooo 


EHT145 


.WORD 


EH145,0 


17 040464 


054226 


oooooo 


EHT150 


.WORD 


EH150,0 


18 040470 


054324 


oooooo 


EHT213 


.WORD 


EH213.0 


■•9 040474 


054421 


oooooo 


EHT220 


.WORD 


EH220.0 



SEQ 0U6 



r 7RMQBG RM05/3/2 DSKLS TST 2 MACRO V04.00 4-APR-81 01:29:56 PAGE 41 
FRROR MESSAGE "ABLE 



1 






c r\ t 1 . 


.WORD 


ED I 


T 
C 




AC/./ 7r\ 


r f\ t *5 ■ 


• WORD 


ED2 


7 

3 




y/*tH f *• 


C f\ T C * 


. WORD 


c ri C 








EDT47 


.WORD 




C 






EDT52 


.WORD 


c r\ C 


o 






EDT57 


.WORD 


c r\ c 7 


7 


040514 


054532 


EDT61 


.WORD 


FDA1 

C L/U ■ 


8 


040516 


054544 


EDT65 


.WORD 


ED65 


9 


040520 


054554 


EDT71 


.WORD 


ED71 


10 


040522 


054470 


EDT74 


.WORD 


ED2 


11 


040524 


054564 


EDT115: .WORD 


ED1 1 5 


12 


040526 


054576 


EDT130: .WORD 


EDI 30 


13 


040530 


054564 


EDT132: .WORD 


ED115 


'4 


040532 


054612 


EDT220: .WORD 


ED220 



r ZRMQBO RM05/3/2 DSKLS T ST 2 
FRROR MESSAGE TABLE 

1 040534 0546 1 6 

2 040536 054621 

3 040540 054622 

4 040542 054624 

5 040544 054616 

6 040546 054616 

7 040550 054621 

8 040552 054624 

9 040554 054630 

10 040556 054624 

11 040560 C54622 



f 12 

N1ACR0 V04.00 4-APR-81 01:29:56 PAGE 42 



EF T 1 : 


.WORD 


til 

cF 1 


EF T2: 


.WORD 


r c T 

EF2 


EF T5 : 


.WORD 


EF 5 


r[TC7, 


uflDft 
. WUNU 


c c C 7 

C r J 1 


EFT65: 


.WORD 


EF1 


EFT71 : 


.WORD 


EF 1 


EFT74: 


.WORD 


EF2 


EFT115: 


.WORD 


EF57 


EFT130: 


.WORD 


EF130 


EFT132: 


.WORD 


EF57 


EFT220: 


.WORD 


EF5 



CZRMQBO RM05/3/2 DSKLS TS T 2 MACRO V04.00 4-APR-81 
ERROR MESSAGE TABLE 



1 


040562 


1 1 6 


11^ 

1 1 7 


116 


EMS1 




.Asrii 


2 


OA 0633 


103 


117 

1 1 7 


116 


EMS2 




.ASCIi 


3 


0A0702 


4 A/ 

106 


1 ^ C 

125 


11^ 

116 


EMS3 




.ASC J i 


4 


0A07A7 


125 


116 


125 


EMS4 




.ASC J 2 


5 


OA 1000 


10A 


1 Af 

105 


126 


EMS5 




.ASCI i 


6 


0A1050 


120 


1 ft 1 

101 


122 


EMS6 




.ASCJi 


7 


/-V / 1 1 / 

0A1 1 1 A 


10A 


1 ft 1 

101 


1 / 

124 


EMS7 




.ASCIi 


8 


041 165 


1 ^ft 

120 


1 ft 1 

101 


122 


EMS 10 


a r e t * 

.ASC J 2 


9 


OA 1230 


1 1 r 

115 


1 ft 1 

101 


1 n7 

123 


EMS 11 




a r /* t 1 

.ASCI . 


1 ft 

10 


0A1300 


ft r ft 

050 


122 


1 1 c 

115 






.ASC 1 2 


1 1 


0A1321 


111 

1 1 1 


11/ 

114 


11/ 


r- ur 1 ~) 

EMS 12 


•ASCI2 


12 


ft/ 1 777 

OAl 377 


1 ft/ 

104 


111 

1 1 1 


1 A1 

101 


rue 1 7 


.ASCI2 


13 


ft / 1 t / z 

0A1 AA6 


11c 

1 1 5 


1 AC 

105 


1 ft/ 

104 


cue 1 / 

EMS 1 4 


.ASC J 2 


14 


ft/ "1 C 1 7 

0A1513 


1 1 r 

1 1 5 


1 ft 1 

101 


111 

1 1 1 


rue 1 C 

EMSl 5 


.ASCI^ 


1 3 


ft y 1 C7i 

0s I 5/1 


11c 
115 


1 A 1 


111 
111 


EMS 16 


a c r j ' 

•ASCI2 


1 

ID 


ft/ 

0A1652 


1 17 

127 


\dd 


111 
I I I 


c ur 1 7 

EMSl 1 


.ASCI l 


I f 


A/ 1 71 7 

OA I 71 5 


1 *\I 
\\JH 


t AC 


1 do 


C UC 1A 

EMS20 


AC/*?' 

.ASCI/ 


IB 


Ay 1 7C "7 

0A1 757 


1 1 C 

115 


1 A 1 

101 


111 

111 


r ur 1 1 

EMS21 


a r /* t ' 

• ASCI/. 




A/ 1A7/. 

OA 20 36 


1 )C 

125 


1 1 4C 

1 16 


1 17 

123 


rue 1 "1 

EMS22 


a r r f ' 

.A5CI2 


20 


CA2103 


1 "57 

125 


1 AC 


1 AC 

105 


CMC 07 

EMS<r5 


A C f t ' 

.ASCIi 


21 


/\j nil 
04 <? 161 


11c 

11 3 


1 A1 
lOl 


111 

m 


CMC O/ 


a c r i ' 

.ASCIi 


22 


04<?<:40 


1 OA 

1 20 


I I f 


1 "57 
I d5 


CMC OC 


•ASCI i 


25 


A/ "511 4. 

04<r516 


11c 
11) 


1 A1 
lOl 


111 
111 


CMC O/* 


A c r t ■ 

.A5CI > 


"5y 
24 


A/ 177C 

04<?5 / 3 


1 AC 

1 03 


1 1 L. 

no 


1 Ay 
1 U4 


CMC 07 


A C C I " 


"5C 

2? 


A/ "5/ / 1 


1 Ay 
I 04 


111 

in 


1 A1 
I 01 


CMC 7A 


a r r f * 

. ASCIi 


<?6 


A/ OC "51 
04^321 


1 1 y 
1 14 


1 A 1 

101 


1 07 

125 


CMC 11 

EM551 


a e r t ' 

.ASCIi 




A/ OC 7"5 


1 1 y 
114 


1 A1 

lOl 


1 "57 

1 25 


CMC 1 0 


a r r t * 

.ASCIi 


do 


A/ "5/1 C "5 

04<?63tr 


1 "57 

idS 


1 AC 

1 05 


1 A7 

1 05 


CMCll 

EM535 


a r r t ■ 

.ASCIi 


dv 


A/ 

04^ 702 


1 *5y 

l<r4 


\dd 


1 A1 

101 


cmc ly 


A C P f " 

.ASCIi 




A/ 0771 

0*»2751 


1 "5^. 

1 26 


117 

\\f 


1 1 y 
114 


EM553 


.ASCIi 


71 
51 


A/ T777 

04<:7 /5 


1 A 7 

107 


117 

I 1 f 


Ay a 
040 


EMS 36 


-A5C J i 


5d 


A/ 

OA 50^5 


1 A7 
I 05 


1 71 

1 51 


1 1 y 
1 14 


EMS37 


a c* r t • 

.ASCIi 


77 

55 


A/ 7AC C 

0*»503 3 


1 1 y 
I I** 


1 A1 

101 


1 07 

1 do 


EMS40 


A C /* f " 

.ASCI/ 


5*» 


A/ 11 17 

0*0 1 35 


1 A7 
'05 


117 
ll/ 


11c 

1 1 3 


EMS41 


A c r t ■ 

.ASCI/ 


7C 

5!) 


Ay 7*5A1 

045<:01 


1 A 7 
105 


117 

ll/ 


11c 

113 


EMS42 


.ASCIi 


7/ 
56 


Ay 70Z. 1 

04 5<:63 


1 Ay 
I 04 


1 

Idd 


111 

111 


EMS 4 3 


a r r t * 

.ASCIi 




Ay illy 
045354 


1 A7 

105 


117 

11/ 


116 


EMS44 


a r /* t " 

.ASCIi 


5o 


Ay 777C 
045573 


111 

111 


1 1 y 

116 


1 ">4t 

126 


EMS45 


a r r t * 

.ASCIi 


TO 

5V 


Ay ly CO 
0A3A3tT 


1 1 y 
MS 


117 

1 1 7 


1 "57 

lr:5 


EMS46 


a c r T " 
.ASCI 4 


/ a 


Ay ic ly 
0433.54 


117 

117 


1 A7 

105 


1 A7 

105 


EMS47 


a r /* t • 

•ASCIi 


41 


Ay ic 7/ 
045374 


111 

in 


1 1 y 
114 


11/ 

114 


EMS 50 


A C ^ f * 

.ASCIi 


/ O 

4<: 


Ay ~Z 1 7 

045645 


117 

l I f 


1 A^ 

1 06 


1 A^ 

1 06 


EMS 51 


a r r t " 

.ASCIi 


<*5 


Ay 171 o 
04571^ 


117 


1 A^. 

1 06 


1 A/_ 

1 06 


EMS 5 2 


a r /* t " 

.ASC Ii 


<«4 


Ay 77C7 

043733 


1 "5 "5 

1 22 


1 "5C 


11/1 

116 


EMS53 


a r r t m 

.ASCIi 




Ay y A1 y 
0440 1 4 


111 
111 


116 


1 "5/1 

126 


EMS54 


.ASCIi 


/ /: 

46 


Ay y A71 
044071 


1 A1 
I0l 


1 Ay 
I 04 


1 A/ 
104 


EMS 5 5 


.ASCIi 


/ 7 


a/ y 1 y 7 
044 Is/ 


1 "5*5 

\dd 


1 AC 

103 


1 A7 
10^ 


EMS56 


a r r f 

.ASCI. 


/ 0 
48 


Ay y 01 1 
044<r 1 3 


Ay "5 
04 


1 *>"5 
idd 


11C 

113 






a c r f " 

.ASCIi 


/ 0 


Ay y 0/ 0 

044^4^ 


1 Ay 
104 


1 00 

idd 


111 

111 


EMS 5 7 


a c r 1 * 
.ASCIi 


3U 




1 ?n 
104 




117 


EMS60 


act 1 ; 


51 


0AAA00 


122 


111 


EMS61 


■ .ASCIi 


52 


0AAA53 


120 


117 


122 


EMS62 


• .ASCIi 


53 


OAA53A 


101 


124 


124 


EMS63 


.ASCIi 


54 


0AA57A 


127 


122 


111 


EMS64 


•ASCIi 


55 


0AA6AA 


105 


130 


103 


EMS65 


•ASCIi 


56 


0AA705 


111 


116 


126 


EMS66 


•ASCIi 


57 


0AA762 


124 


101 


107 


EMS67 


• .ASCIi 
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3N0NEXI S1ENT DEVICE 'lYED" (RMCS2.8IT 12) a 
aCONTROLLER CLEAR "CLR" (RMCS2,8IT 05) 9 
3FUNCTI0N CODE (RMCS1, BITS 01 - 05) S 
3UAIUSED BIT POSITIONS Of 3 
SDEVICE AVAILABLE 'DVA" (RMCS1 , BIT 11) a 
3PARTIY ERROR 'PAR" (RMER1 . BIT 03) a 
3DATA PARITY ERROR 't>PE" (RMER2, BIT 03) a 
3PARITY TEST 'PAT" (RMCS2, BIT 04) a 
aMASSBUS CONTROL BUS PARITY ERROR 'MtPF" a 
a(.WSl, BIT 13) a 

aiLLEGAL REGISTER ERROR "ILR" (RMER1 . BIT 01) a 

aDIAGNOSTIC MODE "DMD" (RMMR1 , BIT 00) a 

3MEDIUM ON LINE ' M0L" (RMDS. BIT 12) a 

aMAINTENANCE UNIT READY 'WUR" (RMMR1 , BIT 09) a 

3MAINTENANCE WRITE PROTECT 'WWP" (RMMR1 . BIT 03) a 

aWRJTE LOCK ' \JRL" (RMDS, BIT 11) a 

8DEVICE CHECK 'DVC•' (RMER2. BIT 07/ a 

3MAINTENANCE DRIVE FAULT ' WDF ' ' (RMMR1, BIT 06) a 

aUNSAFE STATUS 'UNS" (RMER1 , BIT 14) a 

aSEEK INCOMPLETE STATUS "SKI" (RMER2. BIT 14) a 

3MAINTENANCE SEEK ERROR 'WSER" (RMMR1 . BIT 07) a 

3P0SITI0NING IN PROGRESS 'VIP" (RMDS, BIT 13) a 

3MAJNTENANCE ON CYLINDER 'W0C" (RMMR1, BIT 08) a 

BEND OF BLOCK "EBL" (RMMR1. BIT 13) a 

aDIAGNOSTIC END OF BLOCK *DE8l" (RMMR1 , BIT 13) a 

BLAST SECTOR STATUS "IS" (RMMR1 , BIT 02) a 

BLAST SEC TOR/ TRACK STATUS '1ST" (RMMR1 . BIT 01) a 

aSECTOR ADDRESS BITS OF a 

aTRACK ADDRESS BITS OF a 

aVOLUME VALID 'VV (RMDS. BIT 06) a 

aGO BIT (RMCS1, BIT 00) a 

aCYLINDER ADDRESS BITS OF a 

BLAST BLOCK TRANSFERRED, '1ST" (RMDS, BIT 10) a 

aCOMPOSITE ERROR 'tRR" (RMDS, BIT 14) a 

aCOMMAND SEQUENCER TEST BIT "TST" (RMMR2, BIT 12) d 

3DRIVE READY STATUS 'DRY" (RMDS. BIT 07) a 

aCONTINUE "CONT" (RMMR1 . BIT 06> a 

aiNVALID COMMAND ERROR "IVC" (RMER2, BIT 12) a 

3L0SS OF SYSTEM CLOCK ERROR "LSC" (RMER2. BIT n> a 

aOCCUPIED 'TOCC" (RMMR1 , BIT 15) 3 

aiLLEGAL FUNCTION "RF^ (RMER1 , BIT 0) a 

aOFFSET DIRECTION 'X)FD" (RMOF , BIT 07) 3 

aOFFSET MODE 'W (RMDS. BIT 00) a 

3RUN AND GO "T^G" (RMMR1 , BIT 14) a 

aiNVALID ADDRESS ERROR IAE" (RMER1. BIT 10) a 

3ADDRESS OVERFLOW ERROR "AOE" (RMER1 . BIT 09) 3 

3REGISTER MODIFICATION REFUSED ERROR a 

a"RMR" (RMER1. BIT 02) 3 

3DRJVE REQUEST REQUIRED STATUS "DRQ" (RMDT . BIT * 1 ) 

3PR0GRAMMABLE STATUS ' r»GM" (RMDS. BIT 09) 3 

3DRJVE PRESENT STATUS 'DPR" (RMDS. BIT 08) 3 

SPORT REQUEST FLOP 'KQA.RQB" (RMMR2. BITS 15.14) 3 

3ATTENTI0N "ATA" (RMDS. BIT 15) 3 

3WRITE LOCK ERROR 'MLE" (RMER1 , BIT 11) 3 

3EXCEPTI0N "REX" (RMMR1. BIT 1?) 3 

3JNVALID COMMAND ERROR "IVC" (RMER2. BIT 12^ 3 

3TAG BUS (RMMR2. BITS 00-09) OR TAG CONTRCc 3 
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SfO 01 SO 



58 045036 

59 045074 
60 
61 
62 



74 
75 



80 
81 



045142 
045221 

63 045277 

64 045347 

65 045422 

66 045476 

67 045537 

68 045602 
o9 045642 
^O 045716 

71 045764 

72 046024 

73 046051 
046112 
046157 

76 046167 

77 G46226 

78 046244 

79 046302 
046341 
046407 

82 046424 

83 046437 

84 046475 

85 046541 

86 046574 

87 046627 

88 046670 

89 046732 

90 046762 

91 047016 

92 047047 
03 047106 
94 

95 047151 

96 047167 

97 047212 

98 047237 

99 047250 

100 047257 

101 047273 

102 047334 

103 047351 

104 047415 

105 047453 

106 047504 

107 047533 

108 047561 

109 047602 

110 047622 
047642 
047662 

113 047702 
'14 047721 



111 
112 



1'4 
123 

117 
104 
104 
115 

n5 

106 
123 
120 
115 
IK 
127 

no 
no 

105 
110 
122 
110 
104 
'04 
105 
105 
105 
104 
103 
105 
105 
115 
104 
117 
104 
110 
123 
101 

103 
103 
101 
127 
105 
101 
125 
101 
105 
124 
101 
101 
101 
122 
061 
062 
064 
070 
101 
101 



m 

105 

120 
111 
122 
101 
101 
117 
105 
122 
101 
117 
122 
105 
105 
116 
105 
105 
105 
101 
101 
116 
103 
103 
111 
117 
122 
122 
101 
105 
106 
122 
117 
105 
124 

101 
101 
116 
111 
122 
040 
123 
040 
126 

no 

040 
120 
120 
105 
040 
040 
040 
040 
114 
114 



116 
101 

105 
123 
1 11 
111 
111 
122 
103 
117 
111 
117 
111 
101 
101 
101 
101 
101 
101 
124 
124 
101 
103 
103 
123 
116 
122 
122 
111 
123 
106 

m 

114 
122 
124 

116 
116 
131 
124 
122 
117 
111 
132 
105 
105 
123 
120 
120 
107 
050 
050 
050 
050 
1 1 4 
114 



EMS70: 

EMS71 

EMS72 

EMS 73 

EMS 74 

EMS75 

EMS 76 

EMS 77 

EMS100 

EMS101 

EMS 102 

EMS 103 

EMS104 

EMS105 

EMS 106 

EMS 107 

EMS110 

EMS111 

EMS112 

EMS113 

EMS114 

EMS115 

EMS116 

EMS250 

EMS251 

EMS252 

EMS253 

EMS254 

EMS255 

EMS256 

EMS257 

EMS260 

EMS261 

EMS262 

EMS300 
EMS301 
EMS302 
EMS303 
EMS 304 
EMS306 
EMS307 
EMS310 
EMS311 
EMS312 
EMS313 
EMS314 
EMS315 
EMS316 
EMS317 
EMS 320 
EMS321 
EMS322 
EMS323 
EMS 324 



.ASC 
.ASC 

.ASC 

• ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 

• ASC 
.ASC 
.ASC 
.ASC 
.ASC 

.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 
.ASC 



3LJNES (RMMR2. BJTS 10,11,13; 3 
aSEARCH ENABLE 'tSRC" (RMMR1, BJT 11) 3 

30PERATI0N INCOMPLETE ERROR 'UPJ"(RMER1 8JT13) 3 
3D J SABLE SEARCH TJMEOUT ' WSEN" (RMMR1 BIT 12) a 
3DRIVE TIMING ERROR "DTE"(RMER1 ,81 T 12) a 
3MAINTENANCE INDEX PULSE 'WI"(RMMR1 BIT 2) a 
3MAINTENANCE SECTOR PULSE ' WS"(RMMR1 BIT 5) a 
3F0RMAT BIT "TMT16" (RM0F,8IT12) a 
aScCTOR COMPARE 'MSC"(RMMR1 BIT 1) a 
aPROM STROBE 'WC" (RMMR1 BIT 5) a 
3MAINTENANCE BJT CLOCK 'MCLK" (RMMR1 BIT11) a 
3L00KING FOR SYNC 'T>LFS"(RMMR1 ,8IT10) a 
aWRITE GATE 'SBOO" (RMMR2 BJTO) a 
3HEADER SYNC PA T TERN a 
3HEADER AREA ' PHA" (RMMR1 BIT 7) a 
3ENA8LE CRC OUT "ECRC" (RMMR1 BIT 9) a 
8HEADER a 

3READ GATE '8B01"(RMMR2 BIT 1) 3 
3HEADER ERROR 3 

3DATA TIMING SEQUENCER OUTPUT a 
30ATA AREA ' PDA' ' (RMMR1 BIT 8) 3 
3ENA8LE ECC OUT 'EECC" (RMMR1 , BIT 4) 3 
3ECC PATTERN a 
3ECC ERROR a 

3DJSK ADDRESS REGISTER (RMDA) 3 
3C0NTR0L STATUS REGISTER #1 (RMCS1 ) 3 
3ERR0R REGISTER #1 (RMER1 ) a 
3ERR0R REGISTER #2 (RMER2) 3 
3MAJNTENANCE REGISTER #1 (RMMR1) 3 
3DESIRED CYLINDER REGISTER (RMDC) 3 
aOFFSET REGISTER (RMOF) a 
3DRJVE TYPE REGISTER (RMDT) 3 
aHOLDING REGISTER (RMHR) 3 
aSERIAL NUMBER REGISTER (RMSN) a 
3ATTENTI0N SUMMARY REGISTER (RMAS) 3 

aCANNOT CLEAR 3 

3CANN0T WRITE /RE AD 3 

3ANY DEVICE REGISTER 3 

aw I THOU T 3 

3ERR0R 3 

3A ONE FROM 3 

3USJNG MASS8US INITIALIZE. I.E.. 3 
3A ZERO FROM 3 

3EVERY DEVICE REGISTER BIT POSITION 3 
3THE FOLLOWING BITS ARE STUCK 3 
3A SHIFTING ONE BIT FROM 3 
3APPEARS STUCK AT ZERO 3 
3APPEARS STUCK AT ONE 3 
aREGISTER SELECT 3 

31 (1,2,4.8.16) 3 

32 (1.2.4,8.16) 3 
34 (1,2.4,8,16) 3 
38 (1,2.4.8.16) 3 
3ALL ONES FROM 3 
3ALL ZEROS FROM 3 
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SEG 0151 



1 1 5 


047741 


101 


124 


040 


r- ur 7 1 C 

EMS 525 


. ASC I Z 


■NAT 1 r /~\ »•» 

3AT ZERO i 


1 16 


047752 


101 


124 


040 


EMS326 


. ASC JZ 


3AT ONE a) 


* 4 7 

1 7 


047762 


Ar y 

054 


040 


4 17 

1 1 7 


r ur 7 17 

EMS327 


• r r i 1 

.ASCI Z 


3, OR S 


118 


047770 


015 


Ail 

0 1 2 


4 A7 

103 


r A*r 7 7A 

EMS330 


a r r f ~t 

.ASCII 


<CR><LF>iCS MBA CLRL 9 


i 4 A 


AT AAA^ 

050007 


103 s 


1 A 4 

101 


1 16 


r* ur 7 7 1 

EMS331 


a r r ? 7 

.ASC JZ 


■sr AkiLIAf A f" A A "t r A A r PA AU ' i 

SCANNOT READ ZEROS FROM a) 


1 IA 

120 


a r a a t *y 

050037 


-11^ 

1 1 1 


117 

123 


A / A 

040 


r Uf 7 71 

EMS332 


a r r l 7 

.ASCIZ 


ii<* lurAftftrr t *^ 

SIS INCORRECT 9 


121 


050055 


1 1 1 


4 17 

123 


040 


rur 7 7 7 

EMS333 


.ASCIZ 


» r a iA t c r t *n 

91 S NOT SET 9 


v2 


A r A A 7 1 

050071 


1 1 1 


4 17 

123 


A J f\ 

040 


EMS334 


a r t 7 

.ASC IZ 


i I r r r T i 

SIS SET 3 


4^7 

123 


C50101 


123 


4 4 A 

110 


4 4 7 

117 


rur 7 7C 

EMS335 


a r r f 7 

.ASCIZ 


A.riiAi ii a hat fir r r t 

SSHOULD NOT BE SE' 9 


i 1/ 

24 


AC 1 A4 1/ 

050124 


117 

123 


4 4 A 

110 


4 4 7 

11' 


r AAf 77/ 

EMS336 


a r r f 7 

.ASCIZ 


ir • iAi ii a fir r r t i 

SS.-I0ULD BE SET S 


125 


ACA1 / » 

050143 


1 A7 

103 


4 A 4 

101 


4 1 £. 

1 16 


rur 7 7 7 

EMS337 


» r r f 7 

.ASCIZ 


SCANNOT SET S 


1 1Z 


AT A1 C ~7 

050157 


1 A 1 

102 


1 AC 

105 


4 A7 

103 


EMS340 


a r r f T 

.ASCIZ 


•\f\ r r a i i r r *n 

SBE CAUSE S 


12' 


ACA1 ?A 

0501 70 


1 1C 

125 


117 

123 


114 

1 1 1 


EMS341 


a r r 1 7 

•ASCIZ 


l r T A 1 A 1 

BUSING S 


1 i O 


Af A1 77 

0501 77 


1 a/ 

1 04 


1 1C 

125 


13 3 

122 


mr 7/1 

EMS342 


a r r f 7 

.ASCIZ 


IAI Ifi rii/* ftprtf TCB TAAlIf reft 1 

SDURING REGISTER TRANSFER 9 


129 


050231 


1 3C 

125 


11^ 

1 16 


1 AC 

105 


r ur 7/7 

EMS 343 


a r r 1 7 

.ASCIZ 


9UNEXPECTED 9 


1 30 


Af Al/ c 

050245 


1 a i 

102 


125 


1 37 

1 23 


f uf 7/ / 

EMS344 


a r r ? 7 

.ASCIZ 


1fil if T T ur r\i lT /A/ T A A A \ 1 

9BUS TIMEOUT (04 TRAP) 9 


I 51 


050274 


1 Ai 

10? 


171 

1 31 


A/ A 

040 


7 / C 

EMS 54b 


a r r 1 7 

.ASCIZ 


Ifi W firAtCYCfi taaajct rA 1 

9Br REGISTER TRANSFER 9 


1 71 


050322 


1 A7 

103 


1 A1 

101 


1 1 Z. 

116 


ryr 7 / / 

EMS346 


a r r r 7 

.ASCIZ 


1/ AtAiAT nf r r T i 

9CANN0T RESET 9 


1 33 


050340 


1 17 

127 


111 

111 


1 1/ 

124 


EMj34' 


a r f T 7 

.ASCIZ 


9WITH0UT SETTING 9 


1 7/ 

I 54 


C50361 


1 A 1 


1 1C 

125 


1 1/ 

124 


CMC 7 C A 

EM5350 


a r r f 7 

.ASCIZ 


Aftl 1 T 1 

9BUT 9 


1 7C 

1 53 


050366 


1 17 


1 A1 

I0l 


1 37 

123 


CMC 7C 1 

EM5531 


»rr ! 7 

.ASC J Z 


aj iac accct o w a 

■WAS RESET Br m 


1 7Z. 

I 56 


AfAj />/ 

05040*. 


1 17 


4 A 4 

ICl 


1 37 

1 25 


CMC 7C 3 

EMS53<r 


A c r f 7 

.ASCIZ 


Aj i a r f CT AW 1 

9UAS SET Br 9 


1 57 


050420 


111 


116 


A/ A 

04 U 


CMC7C7 

EMS333 


a r r f 7 


A f ii A 1 A A liTif t IT AAA A r 1 

SIN DIAGNOSTIC MODE S 


I 38 


AC A/ / / 

050444 


111 

1 1 1 


1 17 


A/ A 

040 


r mc 7 C / 

EM5334 


a r f f 7 

• .A5CJZ 


Ate rur AfifiC r T a r a aoa i ur t a i 

SIS INCORRECT ACCORDING TO S 


i 5v 


ACA/ 77 

0504 /V 


1 A 7 

'03 


1 A 1 

101 


11/ 

1 1 6 


EMS333 


»rr t i 

' .ASCIZ 


1/* A AnV I A T f LIT flCllt AiT 1 

SCANNOT INCREMENT S 


1 / A 
I4U 


AC AC 3 1 

050521 


1 37 

12' 


1 A1 

1U1 


1 37 

1 25 


CMC 7 C A 

EM5536 


.ASCIZ 


-vi jAC kiAT CCT QU ^ 

SWAS NOT SET BY S 


1/1 
I 4 I 


ACAC/ 1 

030541 


1 T7 

12' 


1 A1 

1 0 I 


1 37 

1 db 


CMC 7C 7 

EM553' 


Apr f 7 

.A5C JZ 


-\i | . C klAT AC CCT Ou r\ 

SUA5 NOT RESET BY S 


14^ 


ACAC/ 7 

030565 


A/ ,"\ 

060 


A/ A 

040 


1 3/ 

1 24 


CMC 7^.A 

EH5360 


ACT f 7 

* .ASCIZ 


— V/~\ T A 1 TO AllC T T mil Af -\ 

SO TO 1 TRANSITION OF S 


1/7 

i <• 5 


ACA/ 1 1 

05061 1 


av i 

061 


A/ A 

040 


1 3/ 

1 24 


CMC tJL 1 

EMS361 


Aff f 7 

-ASCIZ 


Al YA A TfiAAtC 1 T T Afcl Af 1 

SI TO 0 TRANSITION OF 3 


1 / / 


ACA^77 

05063' 


111 

1 1 i 


T7 


A/ A 

040 


CMC 7A 3 


A c r T 7 

.A5CIZ 


aTC f fclT AAlC T C TCfcIT a 

SIS INCONSISTENT S 


1 / c 
143 


ACA/ /A 

050660 


1 A7 

105 


1 A 1 
101 


11/ 

116 


CMC 7^. 7 


ACT f 7 

.A5CJZ 


SCANNOT READ S 


1 / A. 

I4fc 


ACAZ.7C 
0306'3 


1 *"»/ 

lc4 


1 AC 

1 'J3 


1 37 

125 


CMC 7A / 

tn5564 


ACT t 7 

.A5CIZ 


STE5T PATTERN IN S 


1 / 7 
14' 


ACA71 iL 

030'T6 


1 A1 

101 


11/ 

116 


1 A/ 

104 


CMC 7JLC 

tn5563 


•ASCIZ 


SAND S 


I/O 

148 


050'25 


1 A7 
I 05 


1 A1 

101 


1 16 


CMC 7^1 

EMS 566 


a r f t 7 

•ASCIZ 


1 r A A (A in T T ai 1 T t A 1 1 7C 1 

SCANNOT INITIALIZE S 


1 / c\ 

7 49 


ACA7/ /. 

050'46 


1 3/ 

1 24 


1 1 A 
1 10 


1 AC 

105 


CMC 7^ 7 

EM556' 


A c r T 7 

* .ASCIZ 


i y i_ic r amu a kif\ rc Ai ifkirrfj ljac orrn n Ari/ r a i 

STHE COMMAND SEQUENCER HAS BEEN CLOCKED S 


1 CA 
l 30 


AC 1 A1 L. 

031016 


13 3 
1 CC 


1 AC 

103 


1 37 

125 


CMC77A 

EnS5'0 


ACT I 7 

.ASCIZ 


aocccT cadi v a 
SHE5cT cAKLr S 


'CI 

1 3 1 


AC1 A77 

J31053 


1 A/ 

1 04 


111 

Ml 


1 A/ 

104 


CMC 7 71 

EM55' 1 


Acri 7 

•ASCIZ 


af\ f A iiat OCCCT AAl T r MC 21 

SDID NOT RE5ET ON TIME S 


in 

1 JC 


AC 1 Ai "5 

05106*: 


1 A ' 
10 1 * 


1 3C 

1 23 


13 3 

1 22 


CMC 773 

EM55'2 


A C f" f 7 

•ASCIZ 


IAI Ifi T AI A r AAAU A Ai A C V/f" ri i T I Ai, *N 

SDURING COMMAND EXECUTION S 


1 C 7 


AC 111/ 

031 1 14 


13/ 

1 24 


117 

ll' 


A/ A 

040 


CMC 777 

EM5575 


AfT | 7 

.ASCIZ 


ST0 S 


1 c / 

I ^4 


AC 1 1 3A 

051 120 


13 7 

12' 


111 

l I I 


13/ 

124 


CMC 77/ 

cM53'4 


ACT 1 7 

• .ASCIZ 


Ii If Til A AI W r AAAfi f AlA Y ff Aa I AT 1 

SWJTH ANY C0MBINATJON OF S 


1 cc 
I 53 


AC 1 1 C 1 

051 1 51 


1 A3 

102 


171 

1 51 


A/ A 

040 


CMC77C 

EM53' 3 


A C r ? 7 

.ASCJZ 


-VTi \J Af A A 1 AlA 1 

SBY READING S 


1 c*. 
1 36 


AC 1 1 / C 

051 163 


1 A3 

102 


171 

151 


A/ A 

040 


EM55'6 


*rr n 

. ASCI I 


-\r» \j i in t Y l aia i 

S8Y WRITING S 


1 C 7 

13' 


AC 1 OA1 
031<f01 


1 3? 

12' 


1 A* 

10 i 


1 37 

125 


CMC777 

EM53' f 


A c r f 7 

.ASCIZ 


U lAf prt A 

SWAS SET S 


1 CO 

1 38 


AC 1 11 3 

03l<> id 


1 37 

12' 


1 A1 

101 


1 37 

1 25 


CMC / AA 

EM5400 


A C A f 7 

•ASCIZ 


aj jap a i A Y rrr a. 

SWAS NOT SET S 


1 CO 

J 3V 


AC 1 

05 1 22' 


1 A/ 

104 


111 

Ml 


1 A/ 

104 


CMC / A 1 

EM5401 


A C r t 7 

•ASCIZ 


Aa 1 A a iA Y f ft 1 

SDID NOT SET if 


160 


AC 1 "3/ / 

U31<:4«» 


1 37 


I 1 A 

II 0 


111 

1 1 1 


CMC/ A3 

EMS40f: 


ACT f 7 


Al IAJ fir A 

vWHILE m 


1 4. 1 
161 


AC 1 3C 7 

031<:35 


1 A7 

105 


117 

11' 


1 1 c 

113 


CMC / A7 

tn5405 


• ASCI £ 


at AMM AAln CCAl iCftircrj f\ T f\ HAT ADHD T n 

•COfTLAND ScUUENCEH DIP NOT AfcJ0R T a 


lo<: 


AC1 71 / 


1 37 


1 A1 

101 


1 37 


CMC / A/ 


A c r T 7 

.ASCIZ 


ai j a C MAT DC CC T 2» 

ofWAS NUT KtScT ou 


1 A 7 

165 


ac 1 777 

03 1 355 


1 A/ 

104 


1 3C 

123 


1 33 

1 22 


CMC/ AC 

EM5403 


A f r f 7 

.ASCIZ 


AM m T AlA 1 

SDURING S 


i o*» 


AC1 7/ 7 
U3 1 j*f 3 


1 27 
1 c ' 


1 m 
i u i 


1 37. 


cmc/ OA 


ACT 1 7 




165 


051356 


123 


105 


101 


EMS407 


• .ASCIZ 


SSEARCH TIMEOUT S 


166 


051376 


101 


106 


124 


EMS410 


' .ASCIZ 


9AFTER 9 


167 


051405 


127 


101 


123 


EMS411 


.ASCIZ 


SWAS CHANGED 9 


168 


051422 


123 


105 


124 


EMS412 


•ASCIZ 


SSET EARLY 9 


169 


051435 


111 


116 


103 


EMS413 


■ .ASCIZ 


SINCORRECT S 


170 


051450 


103 


101 


V6 


EMS414 


.ASCIZ 


SCANNOT DETECT 9 


171 


051467 


127 


101 


123 


EMS415 


•ASCIZ 


SWAS SIMULATED 9 
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J 12 
GE 43-] 



SEQ 01 



172 


051506 


103 


1 1 7 


122 


173 


051517 


104 


125 


122 


1 74 


051535 


107 


105 


116 


1 75 


051550 


104 


125 


122 


176 
177 


051565 


111 


116 


103 


1 78 


051633 


01 1 


104 


105 


1 79 


051664 


011 


104 


105 


180 


051727 


01 1 


124 


122 


181 


051773 


01 1 


1 1 1 


106 


182 


052020 


01 1 


115 


101 


133 


0520<0 


01 1 


103 


123 


184 


052115 


011 


104 


123 


185 


052150 


011 


104 


1 05 


186 


052223 


01 1 


104 


105 


187 


052264 


01 1 


104 


105 


188 


052354 


01 1 


101 


123 


189 


Any -» 

052427 


01 5 


012 


01 1 


190 


052456 


01 1 


050 


116 


1 91 










i 


AC "DC 0*. 




1 U!> 


1 U I 


193 


052556 


117 


106 


106 


194 


052576 


122 


105 


124 


195 


052637 


122 


105 


114 


196 


052660 


122 


105 


103 


197 


052705 


123 


105 


105 


198 


052^23 


123 


105 


101 


199 


052743 


104 


*01 


124 



EMS416 
EMS417 
EMS420 
EMS421 
EMS422 

EMS500: 



EMS501 
EMS502 
EMS503 
EMS504 
EMS505 
EMS506 
EMS507 
EMS510 
EMS511 



EMS600 
EMS601 
EMS602 
EMS603 
E^S604 
EHS605 
EMS606 
EMS607 



.ASCI2 aCORRECT a 

.ASCI2 SOURING WRITE a 

.ASCIZ 3GENERATED a 

.ASCIZ 3DURING READ a 

.ASCIZ aiNCORRECT DATA TRANSFERRED TO MEMORY 3 

.ASCII 3 DEVICE IS NONEXISTENT, 3<CRXLF> 

.ASCII a DEVICE IS SWITCHED TO OTHER PORTa<CR><LF> 

.ASCIZ a TRANSCEIVER ENABLE SWITCH IS 0FFa<CR><LF> 

.ASCIZ 3 IF MODULE, M7686,3<CR><LF> 

.ASCIZ a MASSBUS TRANSCEIVER, M5922 OR M5923 a<CR><lf> 

.ASCIZ 3 CS MODULE. M7684,a<CR><LF> 

.ASCIZ a DS MODULE, M8685/M7685,3<CR><LF> 

.ASCIZ a DEVICE IS SWITCHED TO A/B PORT POSI TIONd<CR><LF> 

.ASCIZ a DEVICE IS NOT AN RM05/3/2, 0RS<CR><LF> 

.ASCJZ a DEVICE IS SWITCHED TO PROGRAMMABLE PORT POSITION, ORS<CR>^f> 

.ASCIZ 3 ASSUMING THE RH CONTROLLER HAS NO FAULT3<CR><1F > 

.ASCII <CRXLF>3 PROBABLE FAULT (S) :3<CR><LF> 

.ASCIZ 3 (NOT INCLUDING CABLES OR CONNECTORS)a<CR><LF > 

.ASCIZ BREAD IN PRESET COMMAND a 

.ASCIZ aOFFSET COMMAND a 

.ASCIZ aRE TURN TO CENTER CENTER COMMAND a 

.ASCIZ 8RELEASE COMMAND a 

.ASCIZ 3RECALIBRATE COMMAND a 

.ASCIZ aSEEK COMMAND a 

.ASCIZ aSEARCH COMMAND a 

.ASCIZ 3DATA COMMAND a 



AE* 
AE* 
AF/ 
ALl 

am; 

AM/ 
AM/ 
AM/ 
AM/ 
AM/ 
AM/ 
AM/ 
AMS 
AMS 
AMS 
AMI 
AMT 
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SEO 0153 



I 



1 


052761 


105 


130 


'20 


t '1 i . 


.ASCII 


2 


053010 


123 


124 






.ASCIZ 


3 


053037 


040 


1CY 


101 


EH2: 


.ASCII 


4 


053045 


101 


104 


122 


EH3: 


.ASCIZ 


5 


053054 


105 


130 


120 


EH5: 


.ASCII 


6 


053073 


122 


105 


123 




.ASCIZ 


7 


0531 1 2 


105 


130 


120 


EH?: 


.ASCIZ 


8 


053131 


040 


106 


111 


EH47: 


.ASCIZ 


9 


053157 


105 


130 


120 


EH52: 


•ASCII 


10 


053216 


106 


111 


122 




.ASCIZ 


11 


053255 


122 


105 


103 


EH57: 


•ASCII 


12 


053274 


104 


122 


126 




•ASCIZ 


13 


053313 


040 


105 


130 


EH61 : 


•ASCIZ 


14 


053351 


105 


130 


120 


EH65: 


•ASCII 


"5 


053376 


123 


124 


101 




.ASCIZ 


16 


053425 


105 


130 


120 


EH71 : 


•ASCII 


17 


053453 


123 


124 


101 




•ASCIZ 


18 


053502 


105 


130 


120 


EH1 15: 


•ASCII 


19 


053540 


123 


124 


101 




.ASCIZ 


20 


C53577 


105 


130 


120 


EH130: 


.ASCII 


21 


053646 


123 


124 


101 


EH132: 


.ASCIZ 


22 


053715 


105 


130 


120 


• ASCI J 


23 


053754 


103 


117 


125 




•ASCIZ 


24 


054013 


105 


130 


120 


EH142: 


•ASCII 


25 


C54C52 


123 


124 


101 




A C ^ f ? 

.ASCIZ 


26 


0541 11 


105 


130 


1 20 


EH145 : 


.ASCI I 


27 


0541 57 


103 


lib 


1 OA 




act r 7 


28 


054226 


105 


130 


120 


EH150: 


•ASCII 


29 


054266 


122 


105 


123 




.ASCIZ 


30 


054324 


105 


130 


120 


EH213: 


.ASCII 


31 


054362 


122 


105 


123 




.ASCIZ 


32 


054421 


101 


103 


124 


EH220: 


.ASCII 


35 


054440 


122 


105 


123 




•ASCIZ 


34 










.EVEN 





3EXPCTD RECEVD REGSTRS<CRLF> 

aSTATUS STATUS ADRESSS 
3 BASEa<CRLF> 
SAORESSa 

3EXPCT0 STUCK3<CRLF> 

3RESULT BIT(S)3 

8EXPCTD RECEVDa 

a FIRST SECOND CRC3 

8EXPCTD RECEVD EXPCTD RECEVDa<CRLF> 

3FIRST FIRST SECOND SEC0ND3 

8RECEVD DRVTYP3<CRLF> 

3DRVTYP REGADR3 

a EXPECTED ECC RECEIVED ECC3 

3EXPCTD RECEVD TEST3<CRLF> 

aSTATUS STATUS REGSTR3 

3EXPCTD RECEVD TEST3<CRLF> 

aSTATUS STATUS PATTRN8 

aEXPCTD RECEVD REGSTR TESTa<CRLF> 

aSTATUS STATUS ADRESS PATTRN9 

3EXPCTD RECEVD REGSTR TEST OFFSETa<CRLF> 

aSTATUS STATUS ADRESS PATTRN REGSTRS 

3EXPCTD ACTUAL REGSTR OFF SETa<CRLF> 

aCOUNT COUNT ADRESS REGSTR3 

aEXPCTD RECVED REGSTR OFFSETi<CRLF> 

aSTATUS STATUS ADRESS REGSTRd 

3EXPCTD ACTUAL REGSTR RHER1 R*ER2a<CRLF> 

aCMPERR CMPERR ADRESS PATTRN PATTRNd 

3EXPCTD ACTUAL REGSTR F(JNCT!ONa<CRLF> 

dRESULT RESULT ADRESS CODE* 

3EXPCTD ACTUAL STATUS TESia<CRLF> 

dRESULT RESULT ADRESS REGSTRd 

3ACTUAL REGS T i>a<CRLF> 

3RESULT ADRE .,jd 
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SFO 0154 



1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
^9 
20 
21 



054460 
054470 
054474 
054502 
054512 
054524 
054532 
054544 
054554 
054564 
054576 
054612 

054616 
054621 
054622 
054624 
054630 



054636 



001 140 
001 1 36 
001140 
001 1 74 
001 1 74 
001142 
001200 
001140 
001140 
001140 
001140 
001142 

000 
000 

ooc 

000 
000 



001142 
000000 
001142 
001176 
054636 
001 1 36 
001202 
001142 
001142 
001142 
001142 
001136 

000 

000 
000 
000 



001136 

000000 
001200 
001 1 76 
000000 
001 1 74 
001 1 74 
001450 
001136 
001136 



000 



000 
000 



22 


054636 








23 


05564? 








24 




054656 






25 










26 


054636 








27 


054656 


200 






28 


054637 


200 






£7 


U5hOhU 


1 1 L 


i i i 


1 3? 


30 


054656 


055 


055 


055 


31 


054674 


124 


061 


011 


32 


054715 


124 


062 


011 


33 


054732 


124 


063 


011 


34 


054765 


124 


064 


011 


35 


055020 


124 


065 


011 


36 


055052 


124 


066 


011 


37 


055102 


124 


067 


011 


38 


055125 


124 


061 


060 


39 


055157 


124 


06 1 


061 


40 


055207 


124 


061 


062 


41 


055230 


124 


061 


063 


42 


055257 


124 


061 


064 


43 


055304 


124 


061 


065 


44 


055345 


124 


061 


066 


45 


055375 


124 


061 


067 


46 


055433 


124 


062 


060 


47 


055464 


124 


062 


061 


48 


055512 


124 


062 


062 


49 


055543 


124 


062 


063 


50 


055573 


124 


062 


064 


51 


055622 


200 






52 


055623 


117 


120 


105 


53 


055657 


055 


055 
127 


055 


54 


055713 


123 


111 


55 


055737 


055 


055 


055 


56 


055774 


040 


040 


061 


57 


056020 


040 


040 


061 



EDI : 

ED2: 

ED5: 

ED47: 

ED52: 

ED57: 

ED61 : 

ED65: 

ED71 : 

ED115 

ED130 

ED220 

EF1: 

EF2: 

EF5: 

EF57: 

EF130: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



.EVEN 
BUFFER: 
BUFONE : .8LKW 
BUFTWO: .8LKW 
•=8UFFER 



SGDDA T , S8DDA T , SRDADR , 0 

SBDADR. 0 

SGDDAT .SBDDAT .0 

STMP0.STMP1.STMP2.0 

STMPO. BUFFER. STMP1, BUFFERS, 0 

S8DDA T . SBDADR , 0 

STMP2.STMP3. STMPO, STMP1 ,0 

SGDDAT .SBDDAT .STMPO. 0 

SGDDAT .SBDDAT .RMHRO.O 

SG^DA T . S8DDAT . SBDADR , $ TMPO . 0 

SGDDA T . SBDDAT . SBDADR . S TMPO . S TMP 1 . 0 

SBDDAT .SBDADR 

0.0.0 
0 

0.0 

0.0.0.0 
0.0.0.0.0 



258. 
258. 



HELP: 

.ASCII <CRLF> 

.ASCII <CRLF> 

.ASCII SLIST OF TESTSa<CRLF> 

.ASCII a a<CRLF> 

.ASCII an TRANSFER TEST3<CRLF> 

.ASCII 3T2 CTOD TESTa<CRLF> 

.ASCII 3T3 NASS8US INITIALIZE TEST3<CRLF> 

.ASCII 3T4 CLEAR STUCK ACTIVE TEST3<CRLF> 

.ASCII 9T5 TRISTATE TRANSFER TEST3<CRLF> 

-ASCII 3T6 REGISTER SELECT TEST9<CRLF> 

.ASCII aT7 DRIVE TYPE TEST3<CRLF> 

.ASCII 3T10 DEVICE AVAILABLE TESTS<CRlF> 

.ASCII iT11 SEARCH TIMEOUT TEST3<CRLF> 

.ASCII 8T12 SET DTE TEST9<CRLF> 

.ASCII 3T13 FORMAT CHANGE TESTi<CRLF> 

.ASCII 9T14 PROM STROBE TEST3<CRLF> 

.ASCII 9T15 SYNC WORD COUNT INHIBIT TEST8<CRLF> 

.ASCII 3T16 SYNC DETECTION TEST3<CRLF> 

.ASCII iT17 ABORT SYNC DETECTION TEST3<CRLF> 

.ASCII 3T20 SYNC GENERATION TEST3<CRLF> 

.ASCII 3T21 WRITE HEADER TEST3<CRLF> 

.ASCII 3T22 HEADER COMPARE TEST 3<CRLF> 

.ASCII 3T23 ECC GENERATION TEST8<CRLF> 

.ASCII 9124 ECC DETECTION TESTi<CRLF> 

.ASCII <CRLF> 

.ASCII 30PE RATIONAL SWITCH SETTINGS9<CRLF> 

.ASCII 9 9<CRLF> 

.ASCII aSWITCH USE3<CRLF> 

.ascii a a<CRLF> 

.ASCII a 15 

.ASCII a 14 



HALT ON ERR0R3<CRLF> 
LOOP ON TEST3<CRLF> 
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58 056043 


040 


040 


061 


.ASCII 


a 


13 


59 056100 


040 


040 


061 


.ASCII 
.ASCII 


a 


12 


60 056107 


040 


040 


061 


a 


11 


61 056K0 


040 


040 


061 


.ASCII 


a 


10 


62 056164 


040 


040 


040 


.ASCII 


a 


9 


63 056210 


040 


040 


040 


.ASCII 


a 


8 


64 056247 


040 


040 


040 


.ASCII 


a 


7 


65 056263 


040 


040 


040 


.ASCII 


a 


6 


66 056276 


040 


040 


040 


.ASCII 


a 


5 


67 056311 


040 


040 


040 


.ASCII 


a 


4 


68 056324 


040 


040 


040 


.ASCII 


a 


3 


o9 056336 


040 


040 


040 


.ASCII 


a 


2 


?0 056350 


040 


040 


040 


.ASCII 


a 


1 


71 056362 


040 


040 


040 


.ASCI7 


a 


0 


72 
73 


000200 






.END 


200 



SEO 0155 



I TERAT I QNS3<CRL F > 
ERR0R3<CRLF> 
ERR0Ra<CRLF> 
TEST IN SWR<7:0>a<CRLF> 



INHIBIT ERROR T YPE0U T S3<CRLF> 
a<CRLF> 
INHIBIT 
BELL ON 
LOOP ON 
LOOP ON 
TN1283<CRLF> 
TN643<CRLF> 
TN323<CRLF> 
TNl6a<CRLF> 
TN83<CRLF> 
TN43<CRLF> 
TN23<CRLF> 
TN13<CRLF> 



N 12 
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n 


SYMBOL 


TABLE 


















SEO 0156 


r FI- 


ABASE - 


1 76700 


AUTSIZ 


001326 


CHRCNT 


027221 


EDT61 


040514 


EH145 


054111 




EF 


ACDW - 


000000 


AVECT1= 


120254 


CKSWR = 


104410 


EDT65 


040516 


EH150 


054226 




EF 


ACDW2 = 


000000 


AVECT2= 


000000 


CLKSNC 


023574 


EDT71 


040520 


EH2 


053037 






ACPUOP- 


000000 


A16 


000400 


CLOCK 


001536 


EDT74 


040522 


EH213 


054324 






ADDWO = 


000000 


A17 = 


001000 


f LR = 


000040 


ED1 


054460 


EH220 


054421 




EF 


ADDUl = 


000000 


BAD T MO 


002642 


CMNSTA 


005004 


ED1 1 5 


054564 


EH3 


053045 




EF 


ADDW10= 


000000 


3A1 = 


000010 


CNSL01 


031607 


ED130 


054576 


EH47 


053131 




EF 


ADDW1 1 = 


000000 


BBOO = 


000001 


CNSL02 


031617 


ED2 


054470 


EH5 


053054 




EF 


ADDW1 2= 


000000 


B801 = 


000C02 


CNSL03 


031661 


ED220 


054612 


EH52 


053157 




EF 


ADDW1 3= 


000000 


BB02 = 


000004 


CNSL04 


031670 


ED47 


054502 


EH57 


053255 




EF 


ADDU14= 


000000 


BB03 = 


000010 


CNSL07 


031724 


ED5 


054474 


EH61 


053313 




EF 


ADDU1 5= 


000000 


BB04 = 


000020 


CNSL08 


032066 


ED52 


054512 


EH65 


053351 




EF 


ADDW2 = 


000000 


BB05 = 


000040 


CNSL09 


032067 


ED57 


054524 


EH7 


053112 




EF 


ADDW3 = 


000000 


BB06 = 


000100 


CNTCLR 


022404 


ED61 


054532 


EH71 


053425 




EF 


ADDU4 = 


000000 


BB07 = 


000200 


COMMA 


031553 


ED65 


054544 


EMS1 


040562 




EH 


ADDW5 = 


000000 


B808 = 


000400 


CONT = 


000100 


ED71 


054554 


EMS10 


041165 




EH 


A0DW6 = 


000000 


B809 = 


001000 


CPSAVE 


026342 


EECC = 


000020 


EMS 100 


045602 




EH 


ADDW7 - 


000000 


BITO = 


000001 


CR = 


00001 5 


EFT1 


040534 


EMS101 


045642 




EH 


ADDW8 - 


000000 


81 TOO = 


000001 


CRLF = 


000200 


EFT115 


040552 


EMS102 


045716 




EH 


ADDW9 = 


cooooo 


BIT01 - 


000002 


CYLMSK= 


001777 


EFT130 


040554 


EMS103 


045764 




EH 


ADEVCT= 


000000 


BIT02 = 


000004 


DBCK = 


100000 


EFT132 


040556 


EMS 104 


046024 




EH 


ADEVM = 


000000 


8JT03 = 


000010 


DBEN = 


040000 


EFT2 


040536 


EMS 105 


046051 




EH 


ADR 


000001 


BIT04 = 


000020 


DBL = 


002000 


EFT220 


040560 


EMS106 


046112 




EH 


AENV = 


000000 


BIT05 - 


000040 


DCK = 


100000 


EFT5 


040540 


EMS 107 


0461 57 




EH 


AENVM = 


000000 


BIT06 - 


000100 


DDJSP = 


177570 


EFT57 


040542 


EMS 11 


041230 




FH 


AFATAL= 


000000 


BIT07 = 


000200 


DE8L = 


020000 


EFT65 


040544 


EMS110 


046167 




EH 


ALL 


031542 


BIT08 = 


000400 


DISPLA 


001156 


EFT71 


040546 


EMS111 


046226 




EH 


AMADR1 = 


000000 


BJT09 = 


001000 


DJSPRE 


0001 74 


EFT74 


040550 


EMS112 


046244 




EH 


AMADR2= 


000000 


BIT1 - 


000002 


DLT = 


100000 


Ef 1 


054616 


EMS113 


046302 




EH 


AMADR3- 


000000 


BIT10 = 


002000 


DMD = 


000001 


EF130 


054630 


EMS114 


046341 




EH. 


AMADR4= 


000000 


BIT11 - 


004000 


DPE = 


000010 


EF2 


054621 


EMS115 


046407 




EH. 


AMAMS1= 


000000 


BIT12 = 


010000 


DPEHI = 


040000 


EF5 


054622 


EMS116 


046424 




EH 


AMAMS2= 


000000 


BIT13 - 


020000 


DPELO = 


020000 


EF57 


054624 


EMS12 


041321 




EH 


AMAMS3= 


oocooo 


BIT14 - 


040000 


DPR = 


000400 


EHT1 


040364 


EMS 13 


041377 




EH 


AMAMS4- 


000000 


8JT15 - 


100000 


DRIVES 


032110 


EHT115 


040440 


EMS 14 


041446 






AMSGAD= 


000000 


B1T2 - 


000004 


DRQ = 


004000 


EHT130 


040444 


EMS15 


041513 




EH 


AMSGLG= 


000000 


BIT3 


000010 


DRVCLR= 


000010 


EHT132 


040450 


EMS 16 


041571 




AMSGTY= 


000000 


BIT4 ~ 


000020 


DRY = 


000200 


EHT142 


040454 


EMS 17 


041652 




EH 


AMTYP1" 


000000 


BIT5 


000040 


DSWR = 


177570 


EHT145 


040460 


EMS 2 


040633 




EH 


AMTYP2- 


000000 


BIT6 


000100 


DTE = 


010000 


EHT150 


040464 


EMS20 


041713 




EH 


AMTYP3- 


000000 


BIT7 


000200 


DULPRT- 


024024 


EHT2 


040370 


EMS21 


041757 




EH 


AMTYP4- 


000000 


BIT8 = 


000400 


DVA = 


004000 


EHT213 


040470 


EMS22 


042036 




EH 


AOE 


001000 


BIT9 - 


001000 


DVC = 


000200 


EHT220 


040474 


EMS23 


042103 




EH 


APASS 


000000 


BLNKS1 


032345 


E8L = 


020000 


EHT47 


040404 


EMS24 


042161 




EH 


APE 


100000 


BLNKS2 


032344 


ECH = 


000100 


EHT5 


040374 


EMS25 


042240 




EH 


APR I Oft = 


000000 


BLNKS3 


032343 


ECI = 


004000 


EHT52 


040410 


EMS250 


046437 




EH 


APTCSU- 


000040 


BLNKS4 


032342 


ECRC = 


001000 


EHT57 


040414 


EMS251 


046475 




EH 


APTtNV- 


000001 


BO T ADR 


027216 


EDT1 


040500 


EHT61 


040420 


EMS252 


046541 




EH 


APTSIZ= 


000200 


BOTFLG 


027220 


EDT115 


040524 


EHT65 


040424 


EMS253 


046574 




EH 


APTSPO= 


000100 


BPTVEC- 


000014 


EDT130 


040526 


EHT7 


040400 


EMS254 


046627 




EH 


ASWREG= 


000000 


BSE 


100000 


EDT132 


040530 


EHT71 


040430 


EMS255 


046670 




EH 


ATA = 


100000 


BUFFER 


054636 


EDT2 


040502 


EHT74 


040434 


EMS256 


046732 




EH 


ATESTN= 


000000 


BUFONE 


054636 


EDT220 


040532 


EH1 


052761 


EMS257 


046762 




EH 


ATF\WSK = 


000377 


9UF TWO 


055642 


EDT47 


040506 


EH115 


053502 


EMS26 


042316 




FH 


ATNTBL 


032450 


fC 


C04000 


EDT5 


040504 


EH130 


053577 


EMS260 


047016 




FM 


AUMT - 


000000 


CH 


002000 


EDT52 


040510 


EH132 


0S3715 


EMS261 


047047 




eM 


AUSWR 


000000 


CHGAPR 


001330 


EDT57 


040512 


FH142 


0S40'3 


EMS262 


047106 




FM 
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EMS2? 


042375 


EMS 361 


EMS3 


040702 


EMS 362 


EMS 30 


042441 


EMS 363 


EMS 300 


047151 


EMS 364 


EMS 301 


047167 


EMS 365 


EMS 302 


047212 


EMS366 


EMS303 


047237 


EMS367 


EMS 304 


047250 


EMS 37 


EMS 306 


047257 


EMS370 


EMS307 


047273 


EMS371 


EMS31 


042521 


EMS372 


EMS310 


047334 


EMS373 


EMS311 


047351 


EMS374 


EMS312 


047415 


EMS375 


EMS313 


047453 


EMS376 


EMS314 


047504 


EMS377 


EMS315 


047533 


EMS4 


EMS316 


047561 


EMS40 


EMS31 7 


047602 


EMS400 


EMS32 


C42572 


EMS401 


EMS320 


047622 


EMS402 


EMS 321 


047642 


EMS403 


EMS322 


047662 


EMS404 


EMS323 


047702 


EMS405 


EMS324 


047721 


EMS406 


EMS325 


047741 


CMS407 


EMS326 


047752 


EMS41 


EMS327 


047762 


EMS410 


EMS33 


042652 


EMS411 


EMS 330 


047770 


EMS412 


EMS331 


750007 


EMS413 


EMS332 


050037 


EMS414 


EMS333 


050055 


EMS415 


EMS334 


050071 


EMS416 


EMS335 


050101 


EMS417 


EMS336 


050124 


EMS42 


EMS337 


050143 


EMS420 


EMS34 


042^02 


EMS421 


EMS 340 


050157 


EMS422 


EMS 341 


050170 


EMS43 


EMS342 


0501 77 


EMS44 


EMS343 


050231 


EMS45 


EMS 344 


050245 


EMS46 


EMS 345 


050274 


EMS47 


EMS 346 


050322 


EMS5 


EMS 347 


050340 


EMS50 


EMS35 


042731 


EMS500 


EMS350 


050361 


EMS501 


EMS351 


050366 


EMS502 


EMS352 


050404 


EMS 503 


EMS 35 3 


050420 


EMS504 


EMS354 


050444 


EMS505 


EMS 35 5 


050477 


EMS506 


EMS356 


050521 


EMS507 


EMS35 7 


050541 


EMS51 


EMS 36 


042773 


EMS510 


EMS 360 


050563 


EMS511 
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050611 EMS52 043712 

050637 EMS53 043753 

050660 EMS54 044014 

050675 EMS55 044071 

050716 EMS56 044147 

050723 EMS57 044242 

050746 EMS6 041050 

043023 EMS60 044326 

051016 EMS600 052526 

051033 EMS601 052556 

051062 EMS602 052576 

051114 EMS603 052637 

051120 EMS604 052660 

051151 EMS605 052705 

051165 EMS606 052723 

051201 EMS607 052743 

040747 EMS61 044400 

043055 EMS62 044453 

051212 EMS63 044534 

051227 EMS64 044574 

051244 EMS65 044644 

051253 EMS66 044705 

051314 EMS67 044762 

051333 EMS7 041114 

051343 EMS70 045074 

051356 EMS 71 045142 

043133 EMS72 045221 

051376 EMS 73 045277 

051405 EMS 74 045347 

051422 EMS 75 045422 

051435 EMS 76 045476 

051450 EMS 77 045537 

051467 EMTVEC= 000030 

051506 EMT1 032460 

051517 EMTIO 032646 

043201 EMT100 034316 

051535 EMT101 034336 

051550 EMT102 034356 

051565 EMT103 034370 

043263 EMT104 034414 

043334 EMT105 034434 

043375 EMT106 034454 

043452 EMT107 034500 

043534 EMT11 032664 

041000 EMH10 034520 

043574 EMT111 034542 

051633 EMT112 034562 

051773 EMT113 034602 

052020 EMH14 034626 

052070 fMT115 034650 

052115 EMT116 034674 

052150 EMT117 034714 

052223 EMT12 032702 

052264 EMT120 034/34 

043643 EMT121 034760 

052354 EMT1 22 035000 

052427 EMT123 035020 



45- 



3 








SEO 0157 


r 
W 

r 


EMT124 


035044 


EMT206 


036414 




B 


EMT125 


035062 


EMT207 


036444 




& 


EMT126 


035102 


EMT21 


033050 




& 


EMT1 27 


035120 


EMT2'0 


036460 




El* 


EMT13 


032720 


EMT211 


036476 




El' 


EMT130 


035K4 


EMT212 


036514 




El* 


EMT131 


035162 


EMT213 


036526 




El* 


EMT132 


035200 


EMT214 


036556 




EP 


EMT133 


035220 


EMT215 


036570 




El» 


EMT134 


035240 


EMT216 


036610 




El* 


EMT135 


035254 


EMT217 


036624 




El' 


EMT136 


035272 


EMT22 


033072 




Er 


EMT137 


035304 


EMT220 


036640 




El- 


EMT14 


032736 


" EMT221 


036656 




El' 


EMT140 


035322 


EMT222 


036674 




Ef' 


EMT141 


035342 


EMT223 


036712 




Ef 


EMT142 


035356 


EMT224 


036730 




E»' 


EMT143 


035374 


EMT225 


036750 




EP 


EMT144 


035410 


EMT226 


036772 




it 


EMT145 


035432 


EMT227 


037010 




El 


EMT146 


035454 


EMT23 


033116 




EP 


EMT147 


035472 


EMT230 


037026 




EP 


EMT15 


032754 


EMT231 


037044 




El 


EMT150 


035504 


EMT232 


037060 




Ef 


EMT151 


035526 


EMT233 


037102 




El 


EMT152 


035540 


EMT234 


037124 




El 


EMT153 


035554 


EMT235 


037152 




EP 


EMT154 


035574 


EMT236 


037172 




Ef 


FMT155 


035614 


EMT237 


037224 




EP 


hMT156 


035632 


EMT24 


033142 




El 


EMT157 


035654 


EMT240 


037244 




EP 


EMT16 


032772 


EMT241 


037270 




EP 


EMT160 


035672 


EMT242 


037314 




EP 


EMT161 


035722 


EMT243 


037340 




EP 


EMT162 


035740 


EMT244 


037364 




EP 


EMT163 


035756 


EMT245 


037402 




EP 


EMT164 


036000 


EMT246 


037420 




EP 


EMT165 


036022 


. EMT247 


037444 




EP 


EMT166 


036046 


* EMT25 


033166 




EP 


EMT167 


036066 


EMT250 


037462 




EP 


EMT17 


033010 


FMT251 


037506 




EP 


EMT170 


036110 


E.1T252 


037532 




EP 


EMT171 


036122 


EMT253 


037556 




EP 


EMT172 


036136 


EMT254 


037574 




EP 


EMT173 


036154 


EMT255 


037612 




EP 


EMT174 


036176 


EMT256 


037636 




EMT175 


036224 


EMT257 


037654 




EP 


EMT176 


036242 


EMT26 


033206 




EMT1 77 


036260 


EMT260 


037700 




EP 


EMT2 


032466 


EMT261 


037724 




EP 


EMT20 


033026 


EM T 262 


037750 




EP 


EMT200 


036260 


EMT263 


037766 




EP 


EMT201 


036276 


EM T 264 


040004 




E* 


EMT202 


036314 


EM265 


040030 • 




Ef 


EMT203 


036332 


EMT266 


040046 




Ef 


EMT204 


036354 


EMT267 


040064 




Ef 


EMT205 


036374 


EMT27 


033240 




Ef 
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TABLE 


















SF0 CI 58 


r i 


EMT2^0 


040100 


EQUALS 


031540 


ILRG60= 

1 L'< www 


000060 

www 


NSA = 


1 00000 


RIP 


000020 




E* 


EMT271 


040124 


ERR = 


040000 




000062 


OCC = 


1 00000 


RLEASE= 


000012 




If" 




040150 


ERRNM8 


027214 


iiRG64= 


000064 

WWW" 


0FD = 


000200 


RMAS - 


000016 




11" 


EM*273 


040166 


ERROR - 


1 04000 


ilrg66= 


000066 

WWW 


0FF5ET= 


000014 


RMASI 


001354 




If" 


EMT274 


040204 


ERRTYP 


026346 


11 RG70= 


000070 

WW ' V 


0M = 


000001 


RMASO 


001430 




If" 


EMT275 


040222 


ERRVEC= 


000004 


ILRG72= 


000072 

WW » c 


OPE = 


020000 


RMBA = 


000004 




if 


EMT276 


040242 


ERTYOO 


027222 


ILRG74= 


000074 

WW » ~ 


0PI = 


020000 


RMBAE = 


000050 




EC* 


EMT277 


040260 


ertyoi 


027227 


ILRG76= 


OO0O76 

WW VJ 


OR = 


000200 


RMBAEI 


001406 




El"* 


EMT3 


032514 


ERTY02 


027217 


IOTVEC= 


000020 

w w t V 


PACACK= 


000022 


RMBAE 0 


001462 




Ed* 


EMT30 


033260 


ERTY03 


027246 


IPCK.0 = 


000001 

WWW 1 


PAKACK= 


000022 


RMBA I 


001342 




El" 1 


EMT300 


040304 


ERTY04 


027254 


IPCK1 = 


000002 

V W Ww 


PAR = 


000010 


RMBAO 


001416 




EW« 


EMT301 


040330 


ERTY05 


027257 


IPCK2 = 


000004 

V w w~ 


PAT = 


000020 


RMCS1 = 


000000 




EH" 


EMT302 


040346 


ESRC = 


004000 


ipr<3 = 


000010 

WW 1 V 


PCL0CK 


022010 


RMCS1 I 


001336 




EH' 


EMT31 


033300 


FER = 


000020 


IR = 


000100 

V w • w 


PCOUNT 


022076 


RMCS10 


001412 




EP« 


EMT32 


033314 


FMT16 = 


010000 


IVC = 


010000 

V 1 w w 


PDA = 


000400 


RMCS2 = 


00001 0 




EH' 


EMT33 


033326 


FNCDTB 


032350 


L8C = 


002000 

WW V w 


PFECH 


027264 


RMCS2I 


001346 




EW 


EMT34 


033340 


FNCMSK= 


000077 


L8T = 


002000 

WW www 


PFECH1 


027274 


RMCS20 


001422 




EW 


EMT35 


033352 


FO 


000002 


I CLOCK 

L. w W W v r\ 


022026 


PFECH2 


027362 


RMCS3 = 


000052 




EP« 


EMT36 


033364 


F1 


000004 


L COUNT 


022076 


PFECH3 


027400 


RMCS3I 


001410 




EF 


EMT37 


C33404 


F2 


000010 


If = 


00001 2 

www • w 


PFE CH4 


027406 


RMCS30 


001464 




EM 


EMT4 


032534 


F5 


000020 


LODEV 


032244 


PGE = 


002000 


RMDA = 


000006 






EMT40 


C33434 


F4 = 


000040 


LS = 

W sJ 


000004 

W V W V ~ 


PGM = 


001000 


RMDAI 


001344 




EM 


EMT41 


033456 


GE TBUF 


001336 


LSC = 


004000 


* PHA = 


000200 


RMDAO 


001420 






EMT42 


033504 


GO = 


000001 


LST - 


000002 

W W W W V W 


PIP = 


020000 


RMDB = 


000022 




EM 


EMT43 


033522 


GTSWR = 


104407 


LSTOP 


022140 


PIRQ = 


1 77772 


RMDBI 


001360 






EMT44 


033536 


HCE 


000200 


LSTRK 


001334 


PIRQVE= 


000240 


RMDBO 


001434 




E« 


EMT45 


033554 


HCI 


002000 


MCLK' = 


004000 


PLCLK 


022034 


RMDC = 


000034 




EM 


EMT46 


033570 


HCRC - 


000400 


MCPE - 


020000 

www www 


PLFS = 


002000 


RMDCI 


001372 






EMT47 


033604 


HElP 


054636 


MDF = 


000100 

WWW 1 Ww 


PLSTP 


022144 


RMDCO 


001446 




EM 


EMT5 


032556 


HT = 


00001 1 


MDPE = 


000400 

W W W~ WW 


PRO = 


000000 


RMDS = 


000012 




EP 


EMT50 


033622 


IAE 


002000 


MI = 


000004 

ww w w v * 


PR1 


000040 


RMDSI 


001350 




EMT51 


033640 


IBSAVE 


026344 


MOC = 


000400 


PR2 = 


000100 


RMDSO 


001424 




EM 


EMT52 


033634 


IDXMSK= 


000077 


MOH = 


020000 

W W WWW W 


PR 3 = 


000140 


RMDT = 


000026 




EM 


EMT53 


033672 


IE = 


000100 


MOL = 


010000 

w ■ w w w w 


PR4 


000200 


RMDTI 


001 364 




EM 


EMT54 


033706 


ILF 


000001 


MRD = 


002000 

WWW www 


PR 5 = 


000240 


RMDTO 


001440 




EM 


EMT55 


033724 


ILF62 = 


000002 


MR1AAA= 


051401 


PR6 = 


000300 


RMEC1 = 


000044 




EM 


EMT56 


033742 


ILF24 = 


000024 


MS = 


000040 

WW w w ~ w 


PR 7 


000340 


RMEC1I 


001402 




EMT57 


033756 


JLF26 - 


000026 


MSC = 


000002 

V w V WWW 


PS = 


1 77776 


RMEC10 


001456 




EM 


EMT6 


032602 


ILF30 


000030 


MSDRVS 


032144 


PSEL = 


002000 


RMEC2 = 


000046 




EM 


EMT60 


033772 


ILF32 - 


000032 


USE = 


1 00000 

1 w w w w w 


PSTOP 


022132 


RMEC2I 


001404 




EM 


EMT61 


034006 


JLF34 - 


000034 


MSEN - 


010000 

W ■ WW WW 


PSW = 


1 77776 


RMEC20 


001460 




EM 


FMT62 


C 34024 


ILF36 = 


000036 


MSER = 


000200 

WW WW WW 


PUTBUF 


001412 


RMER1 = 


000014 




EM 


EMT63 


034042 


ILF40 = 


000040 


MSGDRV 


032160 


PWRVEC= 


000024 


RMER1I 


001352 




EM 


EMT64 


034054 


ILF42 = 


000042 


MSHELP 


031556 


QUES 


031547 


RMER10 


001426 




EM 


EMT65 


034070 


ILF44 = 


000044 


MUR = 


001000 

WW 1 WWW 


RD = 


000070 


RMER2 = 


000042 




EM 


EMT66 


034102 


ILF46 = 


000046 


MUD = 


00001 0 

WW WW 1 w 


RDCHR = 


104411 


RMER2I 


001400 




EM 


EMT67 


034116 


ILF54 = 


000054 


MUP = 


000010 

VWWW • w 


RDLIN = 


104412 


RMER20 


001454 




EM 


EMT7 


032624 


ILF56 = 


000056 


MXF = 


001000 

WW 1 www 


RDOCT = 


104413 


RMMR — 


000036 




EM 


EMT70 


034134 


ILF64 = 


000064 


N 


032336 


RDY = 


000200 


RMHRI 


001374 




EMT71 


034154 


ILF66 = 


000066 


ND TMSK= 


115760 


READY 


005200 


RMHRO 


001450 




EM 


EMT72 


034200 


ILF74 = 


000074 


NED = 


010000 


READY1 


005226 


RMLA = 


000020 




EM 


EMT73 


034224 


ILF 76 = 


000076 


NEM = 


004000 


RECAL = 


000006 


RMLA1 


001 356 




EM 


EMT 74 


034244 


ILR = 


000002 


NONE 


032137 


RESREG= 


104415 


RMLAO 


001432 




EM 


EMT75 


034254 


ILRG50- 


000050 


NOP = 


000000 


RESVEC= 


000010 


RMMR1 = 


000024 




EM 


EMT 76 


034266 


ILRG52= 


000052 


NOTAVL 


032276 


RFX 


010000 


RMMR1I 


001362 




EM 


EMT77 


034302 


ILRG54= 


000054 


NOTPRS 


032261 


RG 


040000 


RMMR10 


001436 




EM 


E^esfH 


022432 


ILRG56= 


000056 


NOTRM 


032223 


RH 


000072 


RMMR2 


000040 




EM 
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. RMMR21 


001376 


SW05 = 


000040 


TST5 


006360 


RMMR20 


001452 


SW06 = 


000100 


TST6 


007444 


RMOF = 


000032 


SW07 = 


000200 


TST7 


010514 


RMOF I 


001370 


SW08 = 


000400 


TYPBN = 


104406 


RMOFO 


001444 


SW09 = 


001000 


TYPDS = 


104405 


RMR = 


000004 


SW1 


000002 


TYPE = 


104401 


RMSN = 


000030 


SW10 = 


002000 


TYPOC = 


104402 


RMSN I 


001366 


SW11 = 


004000 


TYPON = 


104404 


RMSNO 


001442 


SW12 = 


010000 


TYPOS = 


104403 


RMUC = 


000002 


SW13 = 


020000 


UNS 


040000 


RMUCI 


001340 


SU14 = 


040000 


UNTMSK= 


000007 


RMWCO 


001414 


SW15 = 


100000 


UNTOFF 


032315 


RQA = 


100000 


SW2 


000004 


UN TON 


032326 


ROB 


040000 


SW3 


000010 


UPE = 


020000 


RTC 


000016 


SU4 


000020 


USE = 


040000 


R6 = 


1000006 


SW5 


000040 


UO 


000001 


R7 


1000007 


SW6 


000100 


U1 


000002 


SADMSK= 


000377 


SW7 


000200 


U2 


000004 


SAVREG= 


104414 


SW8 = 


000400 


VV 


000100 


SA1 


C00001 


SU9 


001000 


WATCH 


001534 


SA16 = 


000020 


SYSTAT 


032166 


WC = 


000040 


SA2 ~ 


000002 


TADMSK= 


1 77400 


WCD = 


OOOO^O 


SA4 = 


000004 


TAG 


020000 


WCE = 


040000 


SA8 


000010 


TAGADR= 


001114 


WCEHI = 


010000 


SC 


100000 


TAP 


040000 


UCELO = 


004000 


SCOPE 


000004 


TA1 


000400 


UCF 


000040 


SCTCMP 


023304 


TA16 = 


010000 


WCH = 


000052 


SCTMSK- 


003700 


TA2 = 


001000 


WD = 


000060 


SCO 


000100 


TA4 


002000 


WH = 


000062 


SC1 


000200 


TA8 


004000 


WLE = 


004000 


SC2 - 


000400 


TBI TVE= 


000014 


URL = 


004000 


SC3 = 


001000 


TIME 


001 532 


XNUDC = 


176000 


SC4 


002000 


TKVEC = 


000060 


XNUER2= 


001567 


SEARCH- 


000030 


TPVEC = 


000064 


XNUOF = 


161577 


SEEK - 


000004 


TRAPVE= 


000034 


XSIZ 


003766 


SETLFS 


023412 


TRE = 


040000 


XXDP 


001332 


SETOM 


022302 


TRTVEC= 


000014 


Y 


032340 


SETVV 


022160 


TST = 


010000 


SAPTHD 


001100 


SHUT 


030662 


TSTNMB 


027212 


SATYC 


031316 


SIZCLK 


021550 


TSTOUE 


001466 


SATY1 


031272 


SKI 


040000 


TST1 


005366 


IATY3 


031300 


SNGPRT= 


020024 


TST10 


010636 


SATY4 


031310 


STACK - 


001100 


TST 1 1 


010722 


SAUTOB 


001150 


STANDA 


004322 


TST t 
TST13 


01 1 1 72 


SBASE 


001276 


S T ART 


002732 


011522 


S8DADR 


001136 


START! 


002722 


TST14 


012106 


S8DDAT 


001142 


START? 


002736 


TST15 


012434 


S8ELL 


001212 


STKlHT= 


1 7777U 


TST16 


013104 


$81 N 


024212 


STOPCL 


001540 


TST17 


013530 


SCDW1 


001302 


SWR 


001154 


TST2 


005676 


SCDU2 


001 304 


SWREG 


000176 


TST20 


013752 


tCHARC 


025216 


SUO = 


000001 


TST21 


014444 


SCKSWR 


027722 


SWOO = 


000001 


TST22 


015432 


SCMTAG 


001114 


SWOl = 


000002 


TST23 


016700 


$CM3 = 


000000 


SW02 = 


000004 


TST24 


020070 


$CM4 = 


000005 


SW03 = 


000010 


TST3 


006060 


SCNTLC 


030620 


SWCK = 


000020 


TST4 


006230 


SCNTLG 


030632 



5 













r 


SCNTLU 


030625 


$LPVEC 


001516 




F 


SCPUOP 


001250 


SMADR1 


001254 




E 


SCRLF 


001217 


SMADR2 


001260 




F 


SDBLK 


024430 


SMADR3 


001264 




F 


SDDWO 


001306 


SMADR4 


001270 




F 

Ib 


JDDW1 


001310 


SMAIL 


001222 

WW l c c c 




F 

i. 


SDDW2 


001312 


$MAMS 1 


001252 




El 


SDDW3 


001314 


SMAMS2 


001256 




E 


SDDU4 


001316 


SMAMS3 


001262 






SDDW5 


001320 


SMAMS4 


001266 

WW • W 




E 


SDDW6 


001322 


SMBADR 


001102 




E 


SDDW7 


001324 


SMFLG 


031534 




El 


SDEVCT 


001232 


SMNEW 


030650 




El 


SDEVM 


001 300 


SMSGAD 


001236 






SDOAGN 


021540 


SMSGLG 


001240 




El 


SDTBL 


024420 


SMSGTY 


001222 




E 


SENDAD 


C21530 


SMSWR 


030637 




El 


SENOCT 


021366 


IMTYP1 


001253 




EC 


SENULL 


021544 


JKT VP2 


001257 






SENV 


001242 


SMTYP3 


001263 




El 


SENVM 


001243 


SMTYP4 


001267 




El 


$EOP 


021332 


VIXCNT 


025700 




V 


SEOPCT 


021 360 


SNULL 


001170 




El 


SEOSP 


021274 


$NWTST= 


000001 




V 


SERFLG 


001 1 1 7 


SOCNT 


024662 




V 


SERMAX 


001131 


SOMODE 


024664 




E> 


SERROR 


025752 


SOVER 


025664 




El 


SERRPC 


001132 


SPASS 


001230 




El 


SERRTfi 


001542 


SPASTM 


001106 




F» 


SERTTL 


001126 


$ POWER 


031262 




Et 


SESCAP 


001210 


SPSW 


001530 




V 


SETASL 


001242 


SPWRDN 


031114 




Et 


SETEND 


001 326 


SPWRMG 


031250 






SFATAL 


001224 


SPWRUP 


031166 




Et 


$FFLG 


031536 


SQUES 


001216 




E> 


SFILLC 


001172 


SRDCHR 


030264 




E> 


SFILLS 


001171 


SRDLIN 


030354 




E^ 


SGDADR 


001134 


SRDOCT 


030704 




E^ 


SGDDAT 


001140 


SRDSZ = 


000010 




EF 


SGET42 


021 520 


SRESRE 


024102 




If 


SGTSWR 


030012 


SRM02 


032204 




ft 


SGT42P 


021514 


SRM03 


032211 




EF 


SHD = 


000000 


SRM05 


032216 




Ef 


SHIBTS 


001100 


SRTNAD 


021 54 3 






SHI OCT 


031004 


SSAVRE 


024044 






SJCNT 


001120 


SSAVR6 


031260 






JlLlUP 


031254 


SSCOPE 


025222 






SINTAG 


001151 


SSETUP= 


000137 






$1 TEMB 


001130 


SSTUP = 


\77777 




Ef 


$LF 


001220 


SSVLAD 


025630 




tLFLG 


031535 


SSVPC = 


000210 






SLLCSR 


001522 


$SWR = 


167400 






SllVEC 


001524 


SSWREG 


001244 






SLPADR 


001122 


$SWRMK= 


000000 






SLPCSB 


001514 


SSW08T 


025702 






SLPCSR 


001512 


STESTN 


001226 






SLPERR 


001124 


$ T I ME S 


001206 
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STkB 

STKCNT 

STK JNT 

STKQEN= 

STKOIN 

tTKQOU 

tTKQSR 

STKS 

STKSRV 



00116? 
027412 
027422 
027421 
027414 
027416 
027420 
001160 
027472 



STMPO 

S'MPI 

STMP2 

STMP3 

STMP4 

STN 

STP8 

STPFLG 

STPS 
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001174 
001176 
001200 
001202 
001204 
000025 
001166 
001173 
00H64 
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STRAP 

strap: 

STRP : 

STRPAD 

STSTM 

STSTNM 

STTYJN 

STVPBN 

STYPDS 



031006 
031046 
000016 
031060 
001104 
001116 
030610 
C24H0 
024214 



STVPE 

STVPEC 

STYPEX 

STVPOC 

STVPON 

$ TYPOS 

SUNJT 

SUNITM 

SUSWR 



024666 
025100 
025220 
024464 
024500 
024440 
001234 
001110 
001246 



. ABS. 056646 000 
000000 001 
ERRORS DETECTED: 0 

VIRTUAL MEMORY USED: 60672 WORDS ( 237 PAGES) 

DYNAMIC MEMORY AVAILABLE f OR 70 PAGES 

f ZRMG»j .B I C . C 7RMQ8/ C = C ZRMQ8 . DOC . C ZRMQB . S Y SMAC /M 



SVECT1 
SVECT2 
SXOFF = 
SXON = 
SXTSTR 
SSGET4= 
S$SW08= 
SOFILL 

.sx = 



001272 
001274 
000023 
000021 
025240 
000000 
000025 
024663 
001100 
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MSW08 



SOFILL 

*40CAT 

tAPTHD 

SASTAT 

SATY1 

$ATY3 

IATY4 

tATYC 

tAUTOB 

tBASE 

tSDADR 



S9DDAT 



S9ELL 

S6IN 

ICDW1 

scDwr 

fCHARC 
tCfCSWR 
$C*3 
KW4 

SCHTAG 
$CNTLC 
tCNTLG 
fCNTLU 
$CPUOP 
SCRLF 

toeu 

SDDWO 
SDDU1 
JDDW2 
SDDW3 
SDDW4 
SDDW5 



14-20 

28-1 

28-1 

28-1 

28-1* 

28-1* 

26- 1 

28- 1 

5- 8 
35-1 
35-1* 

27- 1 

29- 1 
35-1 

6- 0* 
6-0* 
13-554 

6-0* 
1 3-706* 
*3-:32* 
1 3-=49* 
13-897* 
13-C37. 
19-44* 
45-6 

6-0* 
13-595* 
13-757* 
1 3-948* 
1 3-<22* 
1 3-337* 
13-C64* 
19-124* 

6-0* 

24- 1 
6-0* 
6-0* 

27-1 
31-1* 

6-0 

6-0 

6-0* 

6-0* 
31-1 
31-1 
31-1 

6-0* 

6-0* 
29-1 

25- 1 
6-0* 
6-0* 
6-0* 
6-0* 
6-0* 
6-0* 



14-20* 

28-1 

28-1 

28-1 

28-1* 

28- 1* 
26-1* 

29- 1 
5-8* 

35-1 

35-1* 
35-1* 
35-1* 

9-28* 

9-76 
1 3-601 
13-14* 
13-728* 
13-.-61* 
13->54* 
13-A25* 
13-C49* 
19-45* 
45-10 
13-8* 
13-610* 
13-758* 
13-962* 
13-<23* 
13-339 
13-C78* 
22-12* 
29-1 
24-1* 



27-1* 

33-1 
6-0* 
6-0 
6-0* 
9-23 

31-1 

31-1* 

31-1 

9-48 
29-1 
25-1 



28-1 

28-1 

28-1 

28-1* 

?8-1* 

26-1 - 



9-66 
10-33 
13-671 
13-15* 
13-729* 
13-: 62* 
13->55* 
13-A26* 
13-C50* 
19-65* 
45-11 
1 3-9 
13-611* 
13-768* 
13-963* 
13-<24 
13-378* 
13-C97* 
22-13* 
29-1 
24-1* 



27-1* 
33-1 

6-0 

9-23 
31-1 

31-1* 

9-81 
29-1 
25- 1 * 



28-1 

28-1 

28-1 

28-1* 

28-1* 

26-1* 



31-1 

10-42* 

13-746 

13-35* 

13-749* 

13-: 76* 

13-736* 

1 3-A79* 

13-C66* 

19-66* 

45-12 

13-29* 

13-620* 

13-769* 

13-986* 

13-<85* 

13-394* 

16-20* 

22-30* 

29-1 

24-1* 



27-1* 



6-0 

9-23 
31-1 



9-142 
30-20 



28-1 

28-1 

28-1 

28-1* 

28-1* 



31-1 

11-56 

13-806 

13-36* 

13-750* 

13-: 77* 

13-737* 

13-A80* 

13-C80* 

19-96* 

13-30 

1 3-621 * 

13-782* 

13-987* 

13-=69* 

13-A23* 

16-21* 

22-31* 

31-1 



27-1* 



6-0 

9-23 
31-1* 



10-20 
30-61 



28-1 
28-1 
28-1 
28-1* 



31-1 

13-1 

13-917 

13-67* 

13-843* 

13-<04* 

13-758* 

13-A98* 

13-C81* 

19-97* 

13-208* 

13-648* 

13-783* 

13-.-25* 

13->13* 

13-A 77* 

17-18* 

45-1 

31-1 



6-0 
9-23 



10-28 
30-104 



28-1 
28-1 
28-1 
28-1* 



13-67 

1 3-995 

13-537* 

13-844* 

13-<05* 

13-759* 

13-A99* 

13-C99* 

19-126* 

13-253* 
1 3-649* 
13-796* 
13-: 26* 
13->52* 
1 3-A96* 
17-19* 
45-3 
31-1 



6-0 
0-23 



10-62 
30-114 



28-1 
28-1 
28-1 
28-1* 



13-73 

13-: 37 

13-538* 

13-882* 

13-<26* 

13-329* 

13-951* 

13-D00* 

19-127* 

13-315* 

13-663* 

13-797* 

13-:57* 

13-734* 

13-948* 

19-32* 

45-6 



6-0 
9-23 



10-101 
30-126 



28-1 
28-1 
28- 1 
28-1* 



13-106 

13-; 54 

13-550* 

13-883* 

13-<27* 

13-330* 

13-952* 

16-23* 

22-15* 

13-536* 

13-664* 

13-839* 

13-: 58* 

13-754* 

13-949* 

19-46* 

45-8 



6*0 



11-25 
30-134 



28-1 
28-1 
28-1 • 
28-1* 



13-137 

13-=29 

13-576* 

13-908* 

13-<64* 

13-343* 

13-972* 

16-24* 

22-16* 

13-546* 

13-666* 

13-840* 

13-: 71* 

13-755* 

13-969* 

19-62* 

45-9 



6-0 



11-67 
30-' 54 



28-1 
28-1 
28-1 
28-1* 



13-159 

13-775 

13-577* 

13-909* 

l3-<65* 

13-344* 

13-973* 

17-22* 

22-33* 

13-547* 

13-702* 

13-878* 

13-: 72 

13-322* 

13-971* 

19-63* 

45-10 



6-0* 



14-20 
31-1 



28-1 
28-1 
28-1 
28-1* 



13-326 

13-910 

13-603* 

13-940* 

13-<82* 

13-379* 

13-C26* 

17-23* 

22-34* 

13-575* 

13-703* 

13-879* 

13-; 48* 

13-323* 

13-C24* 

19-89* 

45-11 



6-0* 



27-1 
31-1 



28-1 
28-1 
28-1* 
28-1* 



SEO 0161 



28-1 
28-1 
28-1* 
28-1* 



13-518 

18- 9 
13-604* 
13-941* 
13-<83* 
13-380* 
13-C27* 

19- 30* 
45-1 

13-578* 

13-725* 

13-907* 

13-.-49 

13-325 

13-C34* 

19-90* 

45-12 



6-0* 



27-1 
31- 1 



13-*>43 

30-25 

13-705* 

13-:31* 

1 3-=48* 

13-396* 

13-C36* 

19-31* 

45-2 

13-594* 
13-726- 
13-947* 
13-<03* 
i 3-336 <- 
13-C48* 
19-123- 



6-0* 



2 /-I 
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seo oi6<- 



SDDW6 

$0Dy7 

SDEvCT 

1DEVM 

IDOAGN 

tOTBL 

SEND AD 

tENOCT 

$f NULL 

SENV 

SENVM 

IE OP 

1E0PCT 

1EOSP 

tERFLG 

SEWAX 

1ERROR 

SERRPC 

KRRT8 

tERTTL 

SESCAP 

SETABL 

SE TEND 

tFATAL 

tFFLG 

tFULC 

tF ILL S 

SGDADR 

tGDDAT 



IGET42 
SGT 42P 
SG T SWR 
SHD 

$HI8TS 

SHIOCT 

SKNT 

SILLUP 

tINTAG 

SITE'S 

SLF 

SLFLG 

SLLCSR 

SLLVEC 

SLPADR 

Si PC SB 

tcPCSR 

JLPERR 

$LPVEC 

SMADR1 

VIADR2 

IWADR3 

$MADR4 



6-0* 
6-0* 
6-0* 
6-0* 

14-20 
25-1 

5- 5 
9-23 

H-20* 

6- 0* 
6-0* 

H-20* 

9-23* 
13-69 

6-0* 

6-0* 

9-23 

6-0* 

8-0* 

6-0* 

6-0* 

6-0* 

5- 8 

6- 0* 
35-1 

6-0* 

6-0* 

6-0* 

6-0* 
13-707* 
13-.47* 
1 3-339 
1 3-C98* 
45-10 
11-34 
H-20 

31- 1* 

4- 678 

5- 8* 

32- 1* 

6- 0* 

34- 1 
6-0* 
6-0* 

6- 0* 

35- 1* 

7- 0* 
7-0* 

6- 0* 

7- 0* 
7-0* 

6- 0* 

7- 0* 
6-0* 
6-0* 
6-0* 
6-0* 



9-68* 


9-79 


9-120* 


10-63* 


10-70* 


10-97 


H-20 


H-20* 










25-1* 












9-28 


H-20* 


29-1 








H-20* 












9-28 


27-1 


29-* 


35-1 


35-1 






9-72 


27-1 


2 7 -1 


35-1 




31-7 












H-20 


14-20* 










13-540 


14-9* 








28-1* 


28-1 


28-1 


28-1 


28-1 


28-1 


9-23* 


28-1 


28-1 


28-1 


28-1 * 




29-1* 










30-54 


29-1 


29-1 


29-1 


29-1* 


29-1* 


30-72 










29-1* 


H-20 


H-20 


14-20* 


29-1 


29-1 


9-23* 


28-1* 


29-1 


29-1 


29-1 


29-1 


6-0* 












35-1* 






35-1* 






35-1* 


35-1* 


35-1* 






27-1 


27-1 


27-1 








27-1 


27-1 











13-11* 
1 3-730* 
13-; 49 
13-377. 
16-25* 
45-11 
11-43 
H-20* 
33-1 
4-678 



13-12* 
13-762* 
1 3-<02* 

13- 395* 
17-21* 

14- 20* 

33-1 
4-678 



13-13* 

13-773* 

13-<28* 

13-A24* 

19-33* 



13-32* 

13-786* 

13-<66* 

13-A78* 

19-47* 



13-33* 

13-799* 

13-<84* 

13-A97* 

19-67* 



32-1* 








28-1* 


28-1 


28-1 


28-1 


28-1* 


34-1 


34-1* 








31-1 


31-1 


31-1 


31-1 


31-1* 


29-1 


29-1 


29-1 


29-1 


29-1 


27-1 


27-1 


29-1 


29-1 


31-1 


35-1 - 










15-26 


15-56* 


15-84* 




15-30 


15-17 


15-17* 


15-18* 


15-29* 


9-23* 


28-1 


28-1 


28-1 


28-1* 


13-52* 










15-12 


15-53* 


15-81* 






9-23* 


28-1 


28-1 


28-" 


28-1* 


75-15* 


15-*6* 


15-31 


15-31* 


15-32 



11-4 



11-38 



31-6* 



29-1 



29-1 



29-1 



13-34* 
13-842* 
13-= 70* 
13-850* 
19-95* 



29-1 - 
31-1 



15-42 
28-1* 



29-1 
15-40 



13-209* 
13-881* 
13->H* 
13-668* 
19-128* 



13-254* 
13-906* 
l3->53* 
13-C25* 
22-14* 



13-314* 
13-942* 
13-735* 
13-C35* 
22-32* 



13-549* 
13-991* 
13-757* 
13-C45* 
45-1 



1 3-580* 
13-: 30* 
13-324* 
1 3-C46 
45-3 



1 3-597* 

13-:60* 

13-325 

13-C65* 

45-8 



13-605 
13-: 78 
13-338 
l3-r79 
45-9 



29-1 • 30-^9 
31-1 



15-42* 15-43* 
28-1* 



15-40* 15-41* 
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tMAii 

IMAMS 1 

SMAMS2 

SMAMS3 

tMAMSA 

tMBADR 

IMFlG 

tMNEW 

tMSGAD 

SMSGLG 

IMSGT 1 

IMSyR 

IMTYP1 

SWTYP2 

JMTVP3 

IMTVP4 

SMXCNT 

WJLl 

tNUTST 



SOCNT 

tOMODE 

tOVER 

IPASS 

tPASTM 

SPOUER 

tpsy 

SPWRDN 

SPWRMG 

SPWRUP 

SOUES 

SR2A 

SRDCHR 

IRDDEC 

SRDLIN 

SRDOCT 

SRDSZ 

WESRE 

SRM02 

$RM03 

SRM05 

SRTNAD 

SSAVR6 

SSAVRE 

tSCOPE 

$SE TUP 



tSTUP 

SSVLAD 
JSVPC 



5- 8 
13-6C1 

6- 0* 
6-0* 
6-0* 

6-0* 

5- 8* 

35-1 
31-1 

6- 0* 
6-0* 
6-0* 

31-1 

6-0* 

6-0* 

6-0* 

6-0* 
28-1 

6-0* 
13-1 
1 3-1 37* 
13-543 
13-671* 
13-995 

13- =29* 
26-1* 
26-1 
28-1 

6- 0* 

5- 8* 
34-1 

7- 0* 
9-23 

34-1* 
34-1 

6- 0* 
33-1 
31-1* 

33- 1 

31- 1* 

32- 1* 
31-1 
23-1* 

9-92 
9-98 
9-103 

14- 20* 

34- 1 
23-1* 

9-23 
4-978 
9-23 
14-20 
4-976 

4- 978* 
28-1 

5- 5 



5-8 
13-671 



35-1* 

31-1* 

35-1 

35-1* 

35-1 

51-1* 



28-1 

27- 1 
13-1 

1 3-1 37* 
13-543 
13-671* 
13-995 

1 3- - 29* 
26-1* 

26- 1* 

28- 1 
9-23* 

34-1* 
1 5-60* 
34-1 

34-1* 

27- 1 

33-1 

33-1 
33-1 
31-1* 

33- 1 
30-32 
30-28 
30-36 

34- 1* 
33-1 

28- 1* 
4-978 
9-23 

14- 20 
4-978 

4- 978* 
2g-1* 

5- 5* 



6-0* 

1 3-746 



35-1* 
35-1* 
35-1 



28-1 

27- 1 
13-1* 
13-159 
13-543* 
1 3-746 

1 3-995* 

13- 775 
26-1* 
26-1* 

28- 1 

14- 20 



15->"7 
34-1* 



27-1 

33-1 

33-1 
33-1 



36-21* 
36-22* 
36-23* 

34-1* 
33-1 

4-978 
9-23 
28-1 
4-978 
4-978* 



9-23 
1 3-806 



35-1* 
35-1* 



28-1* 

27- 1 
13-1* 
13-159 
13-543* 
13-746 

1 3-995* 

13- 775 

26-1* 

28- 1 

14- 20 



29-1 



34-1* 



4-978 
9-23 
29-1 
4-978 
4-978* 



9-28 
13-917 



35-1* 



13-73 

13-159* 

13-554 

13-746* 

13-:37 

13- 775* 

26-1* 
28-1* 

14- 20 



29-1 



34-1 



4-978 
9-23 
29-1 
4-978 



13-1 
1 3-995 



13-73 
13-159* 
13-554 
1 3-746* 
13-: 37 

13- 775* 

26-1* 

14- 20* 



31-1 



4-978 
9-23 
29-1 
4-978 



13-73 
13-:37 



13-106 
13-; 54 



13-H7 
13-=29 



13-159 
13-775 



1 3-326 
13-810 



13-S18 
27-1 



13-543 
28-1 



SCO 0163 

13-554 
29-1 



13-73* 

13-326 

13-554* 

13-806 

13-: 37* 

13-810 



13-73* 

13-326 

13-554* 

13-806 

13-: 37* 

13-610 



14-20* 28-1 



13-106 

13-326* 

13-601 

13-806* 

13-; 54 

13-810* 



28-1 



13-106 

13-326* 

13-601 

13-806* 

13-; 54 

13-810* 



28-1 



13-106* 
13-518 
13-601* 
13-917 
13-; 54* 



13-106* 
13-518 
13-601* 
13-917 
13-; 54* 



13-137 

13-518* 

13-671 

13-91?* 

13-=29 



13-137 

13-518* 

13-671 

13-917* 

13-=29 



31-1 



31-1 



31-1 



4-978* 4-978* 

9-23 9-23 

29-1 31-1 

4-978* A -9 78* 



4-978* 4-978* 

9-23 9-23 

31-1 31-1 
4-978* 4-978* 



4-978* 

9-23 
31-1 
4-978* 



4-978* 4-978* 

9-28 9-28 
31-1 

4-978* 4-978* 



9-23 
9-28 

4-97e* 
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SEO 01 6'. 



ISW08T 
SSWR 



SsyREG 
SSURMK 

tTESTN 

STUES 

STfcB 

JTKCNT 

STKINT 

STKQEN 

STKQ1N 

JTKOOU 

STKQSR 

SUS 

SUSRV 

STHPO 

$T*P1 



STMP2 
STMP3 
, ST1P4 



tTPB 

STPFlG 

$TPS 

STRAP 

STRAP? 

STRP 



STRPAD 

STSTW 

STSTW 

STTYIN 

STVP8N 

STYPDS 

STYPE 

STYPfC 

STYPE* 

S'YPOC 



28-1 
4-667* 
9-23 

13- 671 

14- 20 

28- 1 

29- 1 
6-0* 
4-679 

28-1 

6-0* 
1 3-91 7* 

6-0* 

6-0* 
31-1 
10-4 
31-1 
31-1 
31-1 
31-1 

6-0* 
31-1 

6-0* 
13-A32 

6-Cw 

10-76 
1 3-?67 

6-0* 

6-0* 

6-0* 

4- 668* 
13-137 
13-518 
13-671 
13-917 

1 5- =29 
6-0* 
6-0* 
6-0* 
9-23 

33-1 

33-1 

33-1 

33-1 

33-1 

33-1* 

33-1 

5- 8* 

6- 0* 
31-1 

24- 1* 

25- 1* 
27-1* 
27-1 
27-1 

26- 1* 
26-' 



28- 1 * 
4-678 
9-23 

1 3-746 

28-1 

28- 1 

29- 1 
9-23 
4-679 

28-1 
13-1* 
13-995* 
9-23* 
27-1 
31-1 
11-48 
31-1 
31-1 
31-1 
31-1 
27-1 
31-1* 
13-708* 
13-A46 
10-13* 

10- 78 
13-A52 
13- 15 
13-A55* 

4-678 
13-137 
13-518* 
13-671 
13-917* 
13-=29 
27-1 
27-1 
27-1 
33-1* 
33-1* 
33-1 
33-1 
33-1 
33-1 
33-1* 
33-1* 

11- 46* 
31-1 
33-1 
33-1 
33-1 
27-1 
27-1 
33-1 
26-1* 



4-679 

9-23 
1 3-806 
28-1 

28- 1 

29- 1 

4-679 
28-1 
13-73* 
13-: 37* 
11-47* 
27-1 
31-1* 
31-1 
31-1* 
31-1* 
31-1* 
31-1 
27-1 

13-845* 

1 3-A50 

10-14 

10-83* 

13-89** 

13- 23 
45-7 

13-1 

13-137 

13-543 

13-671 

13-995 

13-=29 

27-1 

27-1 

27-1 



14-20* 

31-1 

33-1 

33-1 

33-1 

27-1 

27-1* 

55- 1 

53-1 



4-679 

9-23 
13-917 
28-1 

28- 1 

29- 1 

4-679 
28-1 
13-106* 

13- ; 54* 

14- 20* 
31-1 
31-1 • 
31-1 

31-1* 
31-1* 
31-1* 
31-1 

13-950* 

13-893* 

10-16 

10-84 

13-C10 

13->90* 



13-1 

13-137* 

13-543 

13-671* 

13-995 

13—29* 

27-1* 

27-1 

27-1 



4-679 
13-1 
1 3-995 
28-1 
28-1 
34-1 

4-679 
28-1 
13-137* 
13-=29* 
28-1 
31-1 
31-1* 
31-1* 

31-1* 
31-1- 

31-1 

13-965* 

13-895 

10-36* 

10-87 

45-4 

13->93* 



13-1 

13-159 

13-543 

1 3-746 

13-995 

13-775 



4-679 
13-73 
13-: 37 
28-1 
28-1 



13-159* 

13-775* 

28-1 

31-1 

31-1* 



31-1* 
31-1* 

31-1 

13-<42* 

16-28* 

10-38 

10-88 

45-5 

13-A54* 



13-1* 

13-159 

13-543* 

13-746 

1 3-995* 

13-775 



4-679 
13-106 
13-; 54 
28-1 
28-1 



4-679 
13-137 
13-=29 

28- 1 

29- 1 



4-679 
13-159 
13-775 

28- 1 

29- 1 



4-679 
13-326 
13-810 

28- 1 

29- 1 



6-0 

13- 518 

14- 20 

28- 1 

29- 1 



6-0 

13- 543 

14- 20 

28- 1 

29- 1 



6-0 

13- 554 

14- 20 

28- 1 

29- 1 



9-23 

1 3- 601 

14- 20 

28- 1 

29- 1 



4-679 4-679 4-679 4-679 



13-326* 
13-810* 
28-1 
31-1 



31-1* 



13-518* 
28-1* 
28-1* 
31-1 



13-543* 

30- 45 
28-1* 

31- 1 



28-1 28-1 28-1 28-1 28-1 
13-554* 13-601* 13-671* 13-746* 13-806* 

31-1 



31-1 


31-1 


31-1* 


31-1* 


31-1* 


31-1 * 


31-1* 


31-1* 


13-<44 


13-<58 


13-=07 


13->85 


13->86* 


13->87* 


13-708 


1 3-765 


19-70* 


45-4 


45-5 


45-7 


45-8 


45-10 


45-11 




10-42 


1C-50* 


10-52 


10-56 


10-66* 


10-67 


10-73 


10-75 


10-90 


10-95 


13-709* 


13-<43* 


13-=13 


13-=21 


13->88* 


13->89* 


45-7 


45-11 














45-4 


45-7 















13-73 

13-159 

13-554 

13-746 

13-:37 

13-775 



13-73 

13-159* 

13-554 

13-746* 

13-: 37 

13-775* 



13-73 

13-326 

13-554 

13-806 

13-: 37 

13-810 



13-73* 

13-326 

13-554* 

13-806 

13-: 37* 

13-810 



13-106 
13-326 
13-601 
13-806 
13-; 54 
13-810 



13-106 

13-326* 

13-601 

13-806* 

13-; 54 

13-810* 



13-106 
13-518 
13-601 
13-917 
13-; 54 
28-1 



28-1 
31-1 



35-1 
27-1* 



28-1 
31-1 



31-1 



28-1 
31-1* 



28-1 



28-1 



28-1 



28-1* 29-1 



29-1 



29-1 



13-106* 

13-518 

13-601* 

13-917 

13-; 54* 

28-1 



33-1 


33-1 


55-1 


53-1 


33-1 


55-1 


55-1 


55-1 


33-1 


33-1 


35-1 


33-1 


33-1 


33-1 


55-1 


33-1 


33-1 


55-1 


55-1 


55-1 


33-1 


33-1 


53-1 


33-1 


33-1 


33-1 


55-1 


33-1 


33-1 


33-1 


53-1 


33-1 


33-1 


33-1 


55-1 


33-1 


33-1 


53-1 


55-1 


33-1 


53-1 


33-1 


53-1 


35-1 


33-1* 


33-1* 


53-1* 


33-1* 


33-1* 


33-1* 


55-1* 


33-1* 


53-1* 


35-1* 


35-1* 


55-1* 
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SEO 0165 



STYPOS 

SUNIT 

SUNITM 

SOSWR 

SvECn 

SVECT2 

tXOFF 

SxCN 

tXTSTR 

.1AS T A 

.tx 

A16 

A17 

ABASE 

ACDW1 

ACDW2 

ACPUOP 

AODWO 

ADDU1 

ADDWlO 

ADDWll 

AD DWl 2 

ADDW13 

ADDU14 

ADDWl S 

ADDW? 

AODW3 

ADDW4 

AODW5 

ADDW6 

AODU7 

ADDU8 

ADDW9 

ADEVCT 

ADE</M 

ADR 



AFNV 
AENVM 
AFAML 
ALL 

AMADR1 
AWADR2 
AMADR3 
AKADR4 
AMAHS 1 
AHAMS2 
AMAHS 3 
AMAMS4 
AW S GAD 
AHSGLG 
AMSGTY 
AHTYP'' 
AMTYP? 



26- 1* 
6-0* 

5- 8* 

6- 0* 
6-0* 
6-0* 

27- 1 

27- 1 

28- 1 # 
35-1 

5- 8 

4-924* 
4-923* 
4-975* 

6- 0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 
6-0 

7 3-1 
13-159* 

13-601* 
13-995 
1 3-?75* 

6-0 

6-0 

6-0 
10-69 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 



33- 1 

r-50« 



10-46 

27-1 
27-1 

35-1 
5-8* 



6-0 
6-0 
6-0 
6-0 
6-0 
6-0 



6-0 
6-0 
6-0 
6-0 
6-0 
6-0 



6-0 

6-0 
13-1* 
13-326 
13-60''* 
1 3-995* 
13-610 

6-0 

6-0 

6-0 
36-*.* 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 

6-0 



11-69 



10-56* 



31-1 



6-0 



30-^2 



13-1* 

13-326* 

13-671 

13-995* 

13-810* 



13-73 
13-326* 
13-671* 
13-: 37 
13-810* 



13-73* 
13-518 
13-671* 
13-: 37* 



13-73* 
13-518* 
13-746 
T3-.-37* 



13-106 
13-518* 
13-746* 
13-; 54 



13-106* 
13-543 
13-746* 
13-; 54* 



13-106* 
13-543* 
13-806 
13-; 54* 



13-137 

13-543* 

13-806* 

13-=29 



13-137* 
13-554 
13-806* 
13—29* 



1 3-1 37* 
13-554* 
13-917 
13-=29* 



13-159 

13-554* 

13-917* 

13-775 



13-159* 
13-601 
13-917* 
13-775* 
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SEO 0166 



AWYP3 

AMTYP4 

AOE 

APASS 

APE 

APR I OR 
APTCSU 
APTENV 
APTSIZ 
APTSPO 
ASWREG 
ATA 

ATESTN 

ATI^ISK 

ATNTBL 

AUNIT 

AUSWR 

AUTSIZ 

AVE C T 1 

AVECT2 

BAD TWO 

BAI 

B800 

BB01 

3B02 

BB03 

BB04 

B805 

BB06 

BB07 

BB08 

B809 

BITO 

BITOO 

BIT01 
BIT02 
BIT03 
BIT04 
BIT05 
BIT06 
BIT07 
BIT08 
BIT09 

BIT1 

8IT10 

BIT11 

BIT12 

BIT13 

BITH 

BIT15 

BIT? 

BIT3 

BIT4 

BIT5 



6-0 

6-0 

4-770* 

6-0 

4-953* 

6-0 
27-1 
27-1 

9-23 
27-1 

6-0 

4-750* 
37-75 

6-0 

4-787* 

9-79 

6-0 

6- 0 

7- 0* 
4-976* 
6-0 
9-3* 
4-942* 
4-871* 
4-87 1 * 
4-871* 
4-871* 
4-871* 
4-871* 
4-871* 
4-871* 
4-871* 
4-871* 
4-682* 
4-682 

29-1 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 

29-1 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 



6-0 
6-0 
4-781 
6-0 



35-1* 
29-1 
35-1* 
35-1 

6-0 
37-58 
37-76 

6-0 

9-120 

6-0 

6-0 

9-65* 

6-0 

6-0 

9-25 

13-: 58 
13->11 



17-77 

35-1 

35-1* 

37-59 
37-79 

10-97 



9-118 
6-0 



13-: 72 
13->14 



37-78 37-81 



35-1* 



37-60 
37-80 



11-17 



10-100* 



37-63 
37-83 



38-3* 



13-211 


13-526 


13-528 


13-531 


4-682* 


4-694 


4-742 


4-/60 


4-682* 


4-693 


4-741 


4-778 


4-682* 


4-692 


4-740 


4-777 


4-682* 


4-691 


4-739 


4-776 


4-682* 


4-690 


4-738 


4-775 


4-682* 


4-689 


4-774 


4-812 


4-682* 


4-759 


4-773 


4-795 


4-682* 


4-758 


4-772 


4-794 


4-682* 


4-735 


4-757 


4-771 


4-682* 


4-734 


4-756 


4-770 


13-256 


13-531 


13-533 




4-733 


4-755 


4-769 


4-791 


4-688 


4-732 


4-754 


4-768 


4-731 


4-753 


4-767 


4-805 


4-752 


4-766 


4-804 


4-821 


4-751 


4-765 


4-803 


4-820 


4-750 


4-764 


4-802 


4-819 



37-82 



37-64 
37-84 



13-: 78 13-<24 13-<28 
13-A61 13-A63 



13-533 
4-779 

4-815 
4-814 
4-813 
4-830 
4-829 
4-811 
4-810 
4-793 
4-792 



4-807 
4-806 
4-822 
4-841 
4-840 
4-839 



37-85 37-86 



37-67 
37-87 



13-; 38 
4-816 

4-833 
4-832 
4-831 
4-871 
4-871 
4-828 
4-827 
4-809 
4-808 



4-824 
4-823 
4-849 
4-865 
4-864 
4-863 



37-68 
37-88 



13-<52 
4-834 

4-871 
4-871 
4-871 
4-941 
4-940 
4-871 
4-852 
4-826 
4-825 



4-851 
4-842 
4-866 
4-877 
4-876 
4-875 



37-69 



13-<97 
4-871 

4-945 
4-945 
4-882 



4-926 
4-871 
4-871 
4-871 



4-868 
4-850 
4-878 
4-921 
4-888 
4-887 



37-70 37-71 37-72 37-73 



13-A39 
4-945 

4-962 
4-961 
4-942 



4-939 
4-881 
4-924 
4-923 



4-880 
4-867 
4-933 
4-932 
4-920 
4-919 



37-74 



4-963 28-1 



4-960 



4-959 
4-925 
4-937 
4-936 



4-922 
4-879 
4-956 
4-955 
4-931 
4-930 



28-1 



29-1 



4-938 
28-1 
28-1 



4-935 
4-934 

29-1 
4-954 
4-953 



28-1 



?9-1 



4-958 29-1 
4-957 28-1 



28-1 
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BIT6 

BIT7 

BIT8 

BIT9 

BLNKS1 

BLNKS2 

BLNKS3 

BLNKS4 

BO T ADR 

BOTFLG 

BPTVEC 

BSE 

BUFFER 

BUF ONE 
BUF TWO 

CC 
CH 

CHGADR 

CHRCNT 

CKSWR 

CLKSNC 

CLOCK 

CLR 

CWSTA 

CNSL01 
CNSL02 
CNSL03 
CNSL04 
CNSL07 
CNSL08 
CNSL.09 
CNTCLR 

COMHA 

CONT 

CPSAVE 

CR 

CRLF 



CVLM3K 

D8CK 

DBEN 



OBL 

OCK 

ODISP 

DEBL 

OISPLA 

OISPRE 



4-682* 
4-682* 
4-682* 
4-682* 

36-35* 
9-134 

36-33* 
9-83 

30-81* 

30-62* 
4-682* 
4-875* 

1 3-560 

45-21* 

13-917 

45-23* 
4-867* 
4-868* 
7-0* 

30-63* 

28-1 

13-304 
7-0* 
4-940* 
9-143 

10-32 

10-40 

10-44 

10-54 

10-61 

10-92 

36-1 5* 

13-7 

13-464 

10-86 
4-828* 

28-1 
4-682* 

43- 185 
4-682* 

36-9 

44- 14 

45- 31 
45-45 
45-59 

4-857* 
4-802* 
4-803* 
13-715 
13-901 
20-26 
4-958* 
4-764* 
4-682* 

4- 804* 
6-0* 

5- 1* 



9-72 



10-34 10-48 



36-32* 
30-99* 
30-109* 



13-631 

45-24 

13-C56 



9-14* 
30-86* 
29-1 
13-831 
13-569 

9-85 
11-2* 
36-8* 
36-9* 
36-10* 
36-11* 
36-12* 
36-14* 

13-28 

13-480 

11-6 

28-1 
10-73 

43- 186 
9-6 

36-11 

44- 16 

45- 32 
45-46 
45-60 
13-80 

19- 106 
4-835 
13-718 
13-902 

20- 27 

4-781 
6-0 

9-23* 
9-23 



30-102 
30-112 



1 3-686 
45-22* 



9-17* 
30-92* 
29-1 
13-878 
13-588 
11-57 



36-34* 



30-117 30-161* 
30-115* 30-162* 



13-812 13-923 13-: 01 13-: 43 13-; 61 13-=35 13-765 13-767 13-782 45-5 



10-25 

30-93 

33-1* 

22-6* 

15-13* 

18-10 



13-75 

13-495 

11-14 

28-1 
10-84 

43- 187 
9-28 

36-12 

44- 18 

45- 33 
45-47 
45-61 

19-119 
13-587 
13-719 

19- 82 

20- 28 

13-C44 
9-23 



9-23* 28-1* 



13-108 
13-545 
36-6* 

28-1* 
27-1 

43- 188 
9-28 

36-13 

44- 20 

45- 34 
45-48 
45-62 



13-641 
13-720 
19-106 
21-10 



45-5 



10-27* 

30-96* 30-100 



13-116 
13-608 



28-1* 
27-1 

43- 189 
9-42 

36-14 

44- 22 

45- 35 
45-49 
45-63 



13-642 
13-723 
19-107 
21-11 



29-1* 



30-105* 30-116* 30-163* 



15-27* 15-39* 19-88 20-14 



13-139 
13-677 



29- 1 

30- 84 

43- 189 
9-53 

36-15 

44- 24 

45- 36 
45-50 
45-64 



13-656 
13-724 
19-113 
21-18 



13-162 
13-748 



29-1 
43-118 

43- 190 
9-59 

36-16 

44- 26 

45- 37 
45-51 
45-65 



13-657 
13-829 
19-114 
21-19 



13-213 
16-14 



29-1 

43- 178 

9-60 
36-18 

44- 28 

45- 38 
45-52 
45-66 



13-658 
13-830 
19-119 



13-262 
18-8* 



29-1 

43- 179 

11-30 
36-20 

44- 30 

45- 39 
45-53 
45-67 



13-661 
13-856 
19-120 



13-365 
19-19 



29-1 

43- 180 

27-1 

44- 1 

44- 32 

45- 40 
45-54 
45-68 



13-662 
13-857 
20-10 



13-381 13-403 13-425 13-442 



29-1* 

43- 181 

27-1 

44- 3 

45- 27 
45-41 
45-55 
45-69 



1 3-696 
13-872 
20-11 



29-1* 

43- 182 

36-4 

44- 5 

45- 28 
45-42 
45-56 
45-70 



13-697 
13-873 
20-21 



29-1* 

43- 183 

36-7 

44- 9 

45- 29 
45-43 
45-57 
45-71 



1 3-698 
13-890 

20-22 



30-180 

43- 184 

36-8 

44- 11 

45- 30 
45-44 
45-58 



13-699 
1 3-891 
20-25 
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DLT 
DMO 



DPE 
DPEHI 
DPELO 
DPR 

DRIVES 
DRQ 

DRVCIR 
DRV 
DSUR 
DTE 

DULPRT 

DVA 

DVC 

EBL 

ECH 

ECI 

ECRC 

ED1 

5D115 

ED130 

ED2 

ED220 

ED47 

ED5 

ED52 

ED57 

ED61 

ED65 

ED71 

EDT1 



EDT115 

EDT130 

EDT132 

EDT2 

EDT220 

EDT47 

EDT5 

EDT52 

EDT57 

EDT61 

FDT65 

EDT71 

EDT74 

EECC 

Eft 

EF130 

EF2 

EF5 



4-930* 
4-816* 
'3-662 
13-755 
13-890 

19- 82 

20- 28 
4-882* 
4-954* 
4-955* 
4-757* 

11-3 
4-842* 
4-702* 
4-758* 
4-682* 
4-767* 
-845* 
4-688* 
4-881* 
4-821* 
4-773* 
4-850* 
4-825* 

41-1 

41-11 

41-12 

41-2 

41-14 

41-4 

41-3 

41-5 

41-6 

41-7 

41-8 

41-9 
8-3 
8-91 
8-154 
8-94 

41-12* 

41-13* 
8-6 

41-14* 
8-118 
8-15 
8-127 
8-142 
8-148 

41-8* 

41-9* 

41- 10* 
4-830* 

42- 1 
42-9 
42-2 
42-3 



4-834* 

13-679 
13-756 
1 3-891 
19-106 
21-10 



36-16* 



6-0 

4-781 
13-523 

9-90 
13-152 

4-781 

13-<75 
45-1* 
41-13 
45-11* 
41-10 
45-12* 
45-4* 
45-3* 
45-5* 
45-6* 
45-7* 
45-8* 
45-9* 
8-49 
8-97 
8-157 
8-193 



41-2* 

41-4* 
8-18 
41-5* 
41-6* 
41-7* 



13-323 

42-5 

45-18* 

42-7 

42-11 



4-835 
1 3-680 
13-766 
1 3-901 
19-107 
21-11 



9-23 
13-611 
13-528 
13-547 



13-C44 
13-<84 
45-10* 
45-2* 



8-52 
8-100 
8-160 
8-202 



8-22 



13-391 
42-6 

45-15* 
45-16* 



13-144 
13-696 
13-767 
13-902 
19-113 
21-18 



8-55 
8-103 
8-196 
41-11* 



13-A15 
45-14* 



13-154 

13-697 

13-780 

16-15 

19-114 

21-19 



13-587 

13-698 

13-781 

16-16 

19-119 



13-618 
1 3-699 
1 3-794 
17-14 
19-120 



13-619 
13-715 
13-795 

19- 20 

20- 10 



13-641 
13-718 
13-829 

19- 23 

20- 11 



13-642 
13-719 
13-830 

19- 24 

20- 21 



13-656 
13-720 
13-856 

19- 37 

20- 22 



13-657 
13-723 
13-857 

19- 38 

20- 25 



1 3-658 
1 3-724 
13-872 

19- 56 

20- 26 



13-661 
1 3-753 
13-873 

19- 57 

20- 2^ 



13-621 13-649 13-664 13-666 13-703 13-726 13-730 

13-533 

13-549 



37-77 37-78 
13-323 



37-85 37-86 



8-58 

8-112 

8-199 



8-61 

8-115 

8-208 



8-64 

8-121 

8-211 



8-70 

8-124 

8-214 



8-73 

8-130 

8-217 



8-76 
8-133 
41-1* 



8-79 
8-136 



8-82 
8-139 



8-85 
8-145 



g-88 
8-151 



8-109 41-3* 



13-A16 13-A24 



C2I 
fR( 
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EF57 
EFT1 



EFT115 

EFT130 

EFT132 

EF T2 

EFT220 

EFT5 

EFT57 

EFT65 

EFT71 

EFT74 

EH1 

EH115 

EH130 

EH132 

EH142 

EW145 

EH150 

EH2 

EH213 

EH220 

FH3 

EH47 

EH5 

EH52 

EH57 

EH61 

EH65 

EH7 

EH71 

EHT1 



EHT115 

EHT130 

EHT132 

EHT142 

EHTH5 

EHT150 

EHT2 

EHT213 

EHT220 

EHT47 

EHT5 

EHT52 

EHT57 

EHT61 

EHT65 

EHT7 

EHT71 

FHT74 

FHS1 

FMS10 

EHS100 



42-4 
8-3 
8-91 
8-151 
8-94 
42-9* 
42-10* 

8-6 
42-11* 
8-15 
8-127 
42-5* 
42-6* 
42-7* 
40-1 
40-12 
40-13 
40-14 
40-15 
40-16 
40-17 
40-2 
40-18 
40-19 
40-11 
40-5 
40-3 
40-6 
40-7 
40-8 
40-9 
40-4 
40-10 
8-3 
8-91 
8-154 
8-94 
40-13* 
40-14* 
40-15* 
40-16* 
8-193 
8-6 
40-18* 
40-19* 
8-118 
8-15 
8-127 
8-142 
8-148 
40-9* 
8-22 
40-10* 
4C-11* 
39-3 
39-119 
39-50 



42-8 
8-49 
8-97 
8-154 
8-193 



42-2* 

8-18 
8-142 



44-1* 
44-18* 
44-20* 
44-22* 
44-24* 
44-26* 
44-28* 
44-3* 
44-30* 
44-32* 
44-4* 
44-8* 
44-5* 
44-9* 
44-11* 
44-13* 
44-14* 
44-7* 
44-16* 
8-49 
8-97 
8-157 
40-12* 



8-202 
40-2* 



40-5* 
8-18 
40-6* 
40-7* 
40-8* 



39-4 

39-121 

39-54 



42-10 
8-52 
8-100 
8-157 
8-202 



8-22 
8-148 



8-52 

8-100 

8-160 



40-1 7* 



40-3* 



8-109 40-4* 



43-1* 
43-8* 

39-56 



45-17* 
8-55 
8-103 
8-160 

42-8* 



8-109 
42-4* 



8-58 

8-112 

8-196 



42-3* 



8-61 

8-115 

8-199 



8-64 

8-118 

8-208 



8-70 

8-121 

8-211 



8-73 8-76 8-79 
8-124 8-130 8-133 
8-214 8-217 42-1* 



8-82 
8-136 



8-85 
8-139 



8-88 
8-145 



8-55 

8-103 

8-196 



8-58 

8-112 

8-199 



8-61 

8-115 

8-208 



8-64 

8-121 

8-211 



8-70 

8-124 

8-214 



8-73 8-76 8-79 
8-130 8-133 8-136 
8-217 40-1* 



8-82 
8-139 



8-85 
8-145 



8-88 
8-151 



CZ 



39-62 



39-64 39-o 7 39-69 39-104 43-68* 
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CMC 1 ."11 


39-50 




4 *-69# 

*• J 'J 7>» 




39-70 


43-70* 








fmsiop 


39-5R 


T9-60 

J~ uv 


39-62 

J T VC 


39-64 

J r 








fwc.i nx 


39-7? 


4^-71# 
















FMC. in/. 


79—65 






43-72# 












FMC1HQ 


39-76 

J7 » V 


/,7_77j» 
















L ~ J 1 UU 


jt vv 


4 7-74* 
















FMC107 


J™OC 


J" O"* 


J T VV 


43-75# 












CMC 1 1 


.3 7 1 CJ 


















CMCl 1 0 


J / o** 


LX~7fJI 
















CMC] 1 1 


J™ oo 


4^-77* 
















CMC 1 1 p 


XQ-QP 


/ 7-78* 

••J ' 
















CMC 1 1 7 




79-106 


43-79# 














CMC 1 1 L 


J7 7\J 


4 7-ROJf 
















CMCl 1 C 


?q-iop 

J7 1 VC 


*t J o ■ ^ 
















CMC 1 1A 


^0-1 OR 

J™ I uo 


4 T-RP # 
















CMC 1 P 


TO-1 1P 


4.3-1 1# 






43-12* 










CMC 1 7 


J 7 — 1 CV 


J" t C O 


79-130 

J 7 1 JV 


39-132 

Jr I JL 












jTT" I J*« 




43-1 T# 






39-336 

-P 7 JJ\J 


39-338 

J 7 V JW 


39-354 


39-370 


CMC 1 S 


1 J*t 


j~ 1 JO 


79-197 

JT 1 T* 


39-31 7 

Jr J 1 r 


39-31 9 

J 7 J 1 r 


t~3 ! O 


J™ 1 H 1 


j~ i j 


79-14S 


79-3P7 


43-15* 










CMC 1 7 


j~ i *t i 


T9-143 

JT 1 "*J 


39-147 


43-16* 

~ -J ' V** 










39-334 


CMC P 

c~oc: 


7Q-B 


^9-177 

J ^ 1 r f 


39-201 

J7 CV 1 


39-229 


39-233 


39-238 


39-249 


39-329 




39-14R 


7Q-1 50 

Jr 1 Jw 


39-152 

J * • -*C 


39-1 54 


39-156 


39- 1 58 


39-162 


43-17* 


39-372 


CMC, PI 


79-1 4R 
J™ 1 "*o 


79-1 SO 

J7 1 JV 


7Q-1 S4 

JT 1 J 9 * 


39-156 

J 7 1 > V 


39-158 

J 7 1 ^V 


39-160 


39-340 


39-356 


CMCPP 

Cnjc C 


39-150 


T9-1S? 

J ' 1 JC 


39-156 

Jr \ J\J 


39-158 


43-19* 










CMC.?* 


79-1 A3 


79-165 

J7 1 U-' 


39-169 

Jr 1 V T 


43-20* 








43-21* 




FMCP4 


39-1 M 




39-167 

Jr IV 


39-349 

J ' -/~ r 


39-365 


39-381 


39-407 






39-1 70 

J7 1 r V 


79-172 

J ' 1 ' C 


39-176 

J r l » V 


43-22* 






39-281 


39-286 


39-307 


cMcpsn 


39-187 


79-189 

J r 1 07 


79-191 

Jr 1 7 1 


39-193 


39-261 

J 7 C w 1 


39-266 

J 7 C WW 




79-P9P 


7Q-707 

J~ JVJ 


43-844 

■t J V"*™ 














FMC.PSP 


39-45 


39-5? 

J7 -'C 


39-21 1 

Jr CI' 


39-213 

J 7 C ■ J 


39-331 


43-85* 








CMCpC? 

LnJC J J 


39-45 

J 7 "f J 


39-78 


39-21 1 

J r t ' l 


39-21 3 


43-86* 






39-184 


43-87* 


PPKPS4 

Cnjc 


39-45 

J7l J 


79-1 7P 

J7 1 JC 


39-1 38 

JT 1 JV 


39-145 

J 7 1 ~ ^ 


39-160 

J 7 1 W 


39-167 


39-1 74 




79-195 

JT ■ T*/ 


T9-203 

J r C V J 


39-261 

J ' C w 1 


39-275 

J r C. ' 


39-28 1 


39-288 


39-412 


43-88* 




LnJC V 


39-90 

J 7 TV 


39-261 

J ^ C w l 


39-264 


43-89* 












cnjc -* ' 


39-98 

J 7 /W 


43-9C# 












43-23* 






TO- 170 


T9-1 7? 

J~ 1 i c 


39-1 74 


39-343 

J 7 J"» J 


39-359 

J 7 J -J r 


39-375 


39-405 




CnjcDv 


TO-1P^ 

J" 1 CJ 


*1 J 7 1* 


















J 7 1 77 


4 T-9?# 
















LnjcOt 


39-292 


79- 70S 

Jr JVJ 


39-31 1 

Jr J 1 1 


39-313 

J 7 J \ J 


43-93* 






39-397 


39-409 


PMC.P7 


39-1 77 


7Q-1 7Q 

J/' 1 r 7 


39-18? 


39-186 

J 7 1 VV 


39-277 

J 7 C ' ' 


79-794 


39-395 


PMC* 


7o_pi g 

J T C 1 7 


7Q_p71 

JT C J 1 


39-235 

JT C-JJ 


39-255 

Jr C J J 


39-259 

Jr C J r 


39-279 

J 7 C * 7 


39-282 


39-284 


39-327 


C~3 JV 


39-181 


79-1 ap 

J ' 1 VC 


39-184 

J7 1 V"* 


39-191 

Jr 1 r ' 


39-193 

J r l rj 


39-203 

J 7 fc W 


39-207 


43-25* 


39-201 


C™*» JW 




T9-8 

JT O 


39-5? 

Jr JC 


39-78 

J 7 f V 


39-1 14 


39-1 1 7 


39-126 


39-177 




39-P64 


J ' cuu 


39-3?9 

J T JC T 


39-334 

J 7 -J J^ 


39-4 1 2 

J 7 ~ ' C 


43-95* 


39-123 


39-132 


39-138 


CMC 701 


J™" 


39-6 

J* V 


39-10 

J r IV 


39-13 

J r 1 -J 


39-15 

J 7 IV 


39-45 




T9-P15 


J~ C J ' 


43-96* 

■t J TV 














C™o JVC 


39-4 




39-8 

JT V 


39-15 

JT t J 


43-97* 

*f J 7/ " 














39-123 

JT 1 C J 


43-98* 














PPK VUi 


39-4 


4 3-99# 

~ J 77" 












43-100* 




L"j JVU 


J7 V 


39-13 


39-45 

J r 1 J 


39-215 


39-257 


79-599 

J 7 t 7 7 


39-301 


39-334 


F MS 307 


39-8 


39-1 77 

Jw iff 


39-201 

J 7 C V ' 


39-229 

J 7 w„ C T 7 


39-233 

J 7 C J 


39-238 


39-249 


39-329 




79-187 

J7 1 O » 


•t J C U" 
















EHS310 


39-10 


39-209 


39-31 3 


43-102* 












EHS311 


39-10 


39-13 


43-103* 














FWS312 


39-12 


43-10^ 














43-105* 


EHS31 3 


39-15 


39-132 


39-138 


39-145 


39-160 


39-167 


39-174 


39-184 



39-238 
39-167 



39-249 
39-174 



39-261 
39-184 
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EMS314 


39-17 


39-21 


39-25 


39-29 


39-47 


43-106* 


43-107* 




EMS315 


39-19 


39-23 


39-27 


39-31 


39-150 


39-181 


39-31 


EMS316 


39-17 


39-19 


39-21 


39-23 


39-25 


39-27 


39-29 


EMS317 


39-17 


39-19 


43-109* 












EMS 32 


39-189 


4 3-27* 














EMS320 


39-21 


39-23 


43-110* 












EMS321 


39-25 


39-27 


43-111* 












EMS322 


39-29 


39-31 


43-1*2* 












EMS323 


43-113* 
















EMS324 


43-114* 
















EMS325 


43-115* 
















EMS 326 


43-1 16* 














39-261 


EMS327 


39-45 


39-72 


39-76 


39-94 


39-117 


39-21 1 


39-246 


i EMS33 


39-191 


43-28* 














EMS330 


39-47 


43-118* 




43-119* 










EMS331 


39-90 


39-179 


39-195 








39-323 


EMS332 


39-98 


39-140 


39-147 


39-162 


39-169 


39-176 


39-186 


EMS333 


39-100 


39-116 


39-119 


39-152 


39-158 


39-237 


39-248 


39-251 


EMS33*. 


39-62 


39-121 


39-152 


39-156 


39-242 


39-292 


39-297 


43-122* 


EMS335 


39-33 


39-43 


39-62 


39-64 


39-119 


39-242 


39-244 


39-244 




39-374 


39-383 


43-123* 








39-338 


39-343 


EMS336 


39-35 


39-60 


39-67 


39-69 


39-112 


39-121 




39-405 


39-409 


4^-124* 






39-154 






EMS337 


39-48 


39-50 


39-130 


39-136 


39-143 


39-156 


39-165 




39-242 


39-244 


39-246 


39-253 


39-269 


39-281 


39-290 


39-295 


EMS34 


39-193 


39-255 


43-29* 








39-69 


39-119 


, EMS 340 


39-33 


39-35 


39-43 


39-62 


39-64 


39-67 




39-370 


39-375 


39-390 


39-405 


43-126* 








EMS 341 


39-50 


39-104 


39-134 


39-141 


39-143 


39-148 


39-1 54 


39-156 




39-193 


39-203 


39-207 


39-211 


39-262 


39-264 


39-266 


39-269 


EMS 342 


39-112 


39-119 


39-121 


39-125 


39-323 


43-128* 






EMS 34 3 


39-86 


39-125 


43-129* 












EMS 344 


39-125 


43-130* 








43-131* 






EMS 345 


39-128 


39-130 


39-205 


39-275 


39-292 


39-170 


39-205 


EMS 346 


39-104 


39-128 


39-134 


39-141 


39-148 


39-163 




43-1 32* 














43-133* 


EMS 347 


39-132 


39-138 


39-145 


39-160 


39-167 


39-174 


39-184 


EMS35 


39-197 


39-237 


39-242 


39-246 


39-253 


43-30* 




39-336 


EMS350 


39-150 


39-152 


39-1 56 


39-1 58 


39-297 


39-313 


39-331 


EMS351 


39-150 


43-135* 














EMS352 


39-37 


39-39 


39-1 58 


43-136* 








39-235 


EMS353 


39-108 


39-110 


39-179 


39-219 


39-225 


39-227 


39-231 


EMS354 


39-187 


39-189 


39-213 


39-219 


39-223 


39-231 


39-235 


39-259 


EMS355 


39-191 


39-193 


39-203 


43-139* 










EMS356 


39-41 


39-317 


39-319 


39-321 


39-388 


43-140* 






EMS357 


39-197 


39-315 


43-141* 










39-315 


EMS 36 


39-201 


39-215 


39-221 


39-223 


39-225 


39-227 


39-251 


39-374 


39-379 


39-383 


39-399 


43-31* 








EMS 360 


39-197 


39-317 


43-142* 












EMS 361 


39-319 


43-143* 














EMS 362 


39-199 


43-14.4* 














EMS 363 


39-209 


39-299 


39-301 


39-313 


43-145* 








EMS 364 


39-213 


39-286 


39-288 


43-146* 








39-259 


EMS 365 


39-64 


39-213 


39-219 


39-225 


39-227 


39-231 


39-235 


EMS 366 


39-217 


43-148* 












4UH9* 


EMS 367 


39-219 


39-225 


39-227 


39-231 


39-235 


39-259 


39-325 


EMS 37 


39-203 


43-32* 















SEO 0171 

43-103* 



39-261 


39-281 


39-282 


39-292 


43-117* 






J7-JUO 


J7 — JOD 




*» J— 1 £U» 




39-297 


39-303 


39-305 


39-307 


39-313 


43-121* 


39-251 


39-294 


39-342 


39-351 


39-358 


39-367 


39-354 


39-359 


39-370 


39-375 


39-390 


39-394 


39-172 


39-182 


39-207 


39-211 


39-221 


39-240 


«• J— It 3* 












39-121 


39-251 


39-338 


39-343 


39-354 


39-359 


39-163 


39-165 


39-170 


39-172 


39-182 


39-191 


39-271 


39-273 


39-277 


39-309 


39-412 


43-127* 


39-271 


39-273 


39-275 


39-277 


39-309 


39-311 


43-134* 












39-240 


39-259 


39-325 


43-137* 






39-279 


39-284 


39-286 


39-288 


39-327 


43-138* 


39-342 


39-347 


39-351 


39-358 


39-363 


39-367 


39-323 


39-325 


39-327 


43-147* 
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EMS370 


39-54 


39-72 


39-?6 


39-94 


39-225 


39-347 


39-363 


39-379 


39-395 


43-150* 










EMS371 


39-106 


39-227 


39-397 


43-151* 






















EWS372 


39-33 


39-35 


39-242 


39-244 


39-248 


39-315 


39-327 


39-331 


39-336 


43-152* 










EMS373 


39-275 


39-292 


43-153* 
























EKS374 


39-281 


43-154* 


























EMS375 


39-303 


43-1 55* 


























EMS376 


39-305 


39-307 


39-311 


39-331 


43-156* 




















EMS37? 


39-33 


39-41 


39-64 


39-323 


39-32 7 


39-331 


39-340 


39-349 


39-356 


39-365 


39-372 


39-381 


39-392 


39-407 




43-157* 
























EMS4 


39-90 


39-195 


43-4* 
























EMS40 


39-205 


39-207 


43-33* 
























EMS400 


39-35 


39-70 


39-336 


43-158* 






















EHS401 


39- 


39-76 


39-80 


39-94 


39-96 


39-325 


39-332 


39-336 


39-345 


39-361 


39-377 


39-384 


39-401 


39-410 




43-159* 
























EHS402 


39-37 


39-39 


39-41 


39-69 


39-340 


39-349 


39-356 


39-365 


39-372 


39-381 


39-392 


39-407 


43-160* 




E*S403 


39-340 


39-349 


39-356 


39-365 


39-372 


39-381 


39-392 


39-407 


43-161* 








EWS404 


39-343 


39-35? 


39-375 


39-399 


39-405 


43-162* 


















EHS405 


39-84 


39-92 


39-338 


39-343 


39-345 


39-347 


39-352 


39-354 


39-359 


39-361 


39-363 


39-368 


39-370 


39-375 




39-377 
39-37 


39-379 


39-384 


39-386 


39-390 


39-395 


39-397 


39-399 


39-401 


39-403 


39-405 


39-410 


43-163* 




EMS406 


39-39 


39-338 


39-354 


39-370 


39-390 


43-164* 














EMS-.07 


39-388 


A 3-1 65* 


























EKS41 


39-209 


39-211 


39-213 


39-242 


39-244 


39-248 


39-321 


39-323 


43-34* 


- 










EMS410 


39-48 


43-166* 


























EKS411 


39-43 


39-48 


43-167* 
























EMS412 


39-56 


39-58 


43-168* 
























E«S413 


39-65 


39-82 


39-84 


39-92 


39-102 


39-108 


43-169* 










• 






EWS414 


39-74 


39-88 


43-170* 
























E*S415 


39-65 


39-67 


39-69 


43-171* 






















FMS416 


39-67 


39-88 


43-172* 
























EMS417 


39-74 


39-80 


39-82 


39-96 


39-102 


43-173* 


















EMS42 


39-21 7 


39-219 


43-35* 
























EHS420 


39-82 


39-102 


43-1 74* 


























39-86 


39-88 


43-175* 
























EWS422 


39-110 


43-1 76* 


























EWS43 


39-223 


43-36* 












• 














EWS44 


39-229 


39-231 


43-37* 
























EWS45 


39-233 


39-235 


43-38* 
























EMS46 


39-238 


39-240 


43-39* 
























EMS47 


39-244 


39-246 


39-249 


39-259 


43-40* 




















EMS5 


39-100 


39-299 


43-5* 
























EMS50 


39-251 


39-255 


43-41* 
























EMS 500 


39-5 


43-1 78* 


























EMS501 


39-5 


39-7 


39-9 


39-11 


39-14 


39-16 


39-18 


39-20 


39-22 


39-24 


39-26 


39-28 


39-30 


39-32 




39-46 


39-53 


39-79 


39-91 


39-99 


39-101 


39-113 


39-115 


39-118 


39-120 


39-122 


39-124 


39-135 


39-142 




39-144 


39-149 


39-151 


39-153 


39-155 


39-157 


39-159 


39-164 


39-166 


39-1 71 


39-173 


39-198 


39-202 


39-210 




39-212 


39-214 


39-216 


39-222 


39-224 


39-236 


39-241 


39-243 


39-245 


39-247 


39-250 


39-252 


39-254 


39-256 




39-258 


39-260 


39-263 


39-265 


39-270 


39-272 


39-274 


39-276 


39-278 


39-283 


39-285 


39-293 


39-296 


39-298 




39-300 


39-302 


39-304 


39-306 


39-308 


39-310 


39-312 


39-314 


39-316 


39-318 


39-320 


39-322 


39-324 


39-326 




39-328 


39-333 


39-335 


39-337 


43-181* 




















EMS 502 


39-5 


39-7 


39-9 


39-11 


39-14 


39-16 


39-18 


39-20 


39-22 


39-24 


39-26 


39-28 


39-30 


39-32 




39-46 


39-120 


39-122 


39-124 


39-280 


39-330 


39-333 


39-402 


43-182* 












EHS503 


39-5 


39-9 


39-11 


39-14 


39-16 


39-34 


39-36 


39-38 


39-40 


39-42 


39-44 


39-46 


39-49 


39-51 




39-53 


39-59 


39-61 


39-73 


39-77 


39-79 


39-81 


39-85 


39-93 


39-95 


39-97 


39-107 


39-127 


39-129 




39-131 


39-133 


39-135 


39-137 


39-139 


39-142 


39-144 


39-146 


39-149 


39-155 


39-161 


39-164 


39-166 


39-168 




39-171 


39-173 


39-175 


39-178 


39-180 


39-183 


39-185 


39-188 


39-190 


39-200 


39-216 


39-218 


39-220 


39-226 




39-228 


39-230 


39-232 


39-234 


39-236 


39-239 


39-241 


39-250 


39-252 


39-280 


39-312 


39-326 


39-328 


39-330 




39-533 


39-335 


39-337 


39-339 


39-341 


39-344 


39-346 


39-348 


39-350 


39-353 


39-355 


39-357 


59-360 


39-362 
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EMS505 

EMS506 

EMS507 

EWS51 

EWS510 

EMS5 1 1 



EMS52 

EMS53 

EMS 54 

EMS55 

EMS 56 

EMS57 

EMS6 

EMS60 

EMS600 

EMS601 

EMS602 

EMS605 

EMS604 

EMS605 

EMS606 

EMS607 

EMS61 

EMS62 

EMS65 

EMS64 

EMS65 

EMS66 

EMS67 

EMS7 

EMS 70 

EMS 71 

EMS 72 

EMS 73 

EMS 74 

EMS 75 

EMS 76 

EMS 77 

EMT? 



39-364 
39-396 
39- 11 
39-83 
39-206 
39-7 
39-99 
39-101 
39-257 
39-280 
39-5 
39-34 
39-63 
39-93 
39-122 
39-153 
39-185 
39-214 
39-243 
39-274 
39-304 
39-333 
39-364 
39-396 
39-269 
39-279 
39-281 
39-290 
39-292 
39-297 
39-114 
39-297 
39-262 
39-269 
39-271 
39-309 
39-338 
39-354 
39-370 
39-92 
39-301 
39-303 
39-311 
39-327 
39-329 
39-334 
39-352 
39-116 
39-37 
39-33 
39-33 
39-37 
39-37 
39-39 
39-43 
39-39 
8-3 



39-366 

39-398 

39-14 

39-87 

39-208 

43-185* 

43-186* 

43-187* 

39-273 

43-188* 

39-7 

39-36 

39-66 

39-95 

39-124 

39-155 

39-1 88 

39-216 

39-245 

39-276 

39-306 

39-335 

39-366 

39-398 

39-271 

39-401 

39-234 

43-46* 

39-294 

43-49* 

39-1 1 7 

43-50* 

39-264 

43-193* 

39-273 

43-195* 

39-340 

39-356 

39-372 

39-390 

43-51* 

39-305 

39-313 

43-54* 

39-332 

39-336 

39-368 

39-1 1 7 

39-136 

39-35 

39-35 

39-39 

43-64* 

39-41 

39-48 

39-41 

39-5* 



39-369 

39-400 

39-16 

39-89 

39-258 



A 3-42* 

39-9 

39-38 

39-68 

39-97 

39-127 

39-157 

39-190 

39-2 , 8 

39-247 

39-278 

39-308 

39-337 

39-369 

39-400 

39-275 

43-44* 

39-286 

39-295 

39-119 

39-266 

43-194* 

39-343 
39-359 
39-375 
39-392 

39-307 
39-315 

43-55* 

39-338 

39-^86 

43-7* 

39-384 

43-61* 

43-62* 

39-41 

43-65* 
A 3-66* 
43-67* 



39-371 

39-402 

39-38 

39-103 

39-267 



39-11 

39-40 

39-71 

39-99 

39-129 

39-159 

39-192 

39-220 

39-250 

39-280 

39-310 

39-339 

39-371 

39-402 

39-277 

39-288 

39-331 

39-121 

39-412 



39-345 
39-361 
39-377 
39-395 

39-309 
39-317 



39-343 
39-403 



39-43 



39-373 

39-404 

39-40 

39-105 

39-276 



39-14 

39-42 

39-73 

39-101 

39-131 

39-161 

39-194 

39-222 

39-252 

39-283 

39-312 

39-341 

39-373 

39-404 

43-43* 

43-45* 

43-47* 

43-6* 

43-192* 



39-347 
39-363 
39-379 
39-397 

43-52* 
39-319 



J9-354 
43-57* 



39-410 43-59* 



( 

39-48 



39-376 

39-406 

39-42 

39-109 

39-278 



39-16 

39-44 

39-75 

39-103 

39-133 

39-164 

39-196 

39-224 

39-254 

39-285 

39-314 

39-344 

39-376 

39-406 



39-349 
39-365 
39-381 
39-399 



39-321 
39-359 



39-378 

39-408 

39-51 

39-111 

39-283 



39-8 

39-46 

39-77 

39-105 

39-135 

39-166 

39-198 

39-226 

39-256 

39-287 

39-316 

39-346 

39-378 

39-408 



39-352 
39-368 
39-384 
39-401 



39-323 
39-370 



39-69 43-63* 



39-380 

39-411 

39-55 

39-118 

39-287 



39-20 

39-49 

39-79 

39-107 

39-137 

39-168 

39-200 

39-228 

39-258 

39-289 

39-318 

39-348 

39-380 

39-411 



43-196* 
43-197* 
39-386 
39-403 



39-325 
39-375 



39-382 

43-163* 

39-57 

39-188 

39-289 



39-22 

39-51 

39-81 

39-109 

39-139 

39-171 

39-202 

39-230 

39-260 

39-291 

39-320 

39-350 

39-382 

39-413 



39-385 59-387 39-389 



SEO 0173 
39-391 39-393 



43-198* 
39-405 



39-345 
39-388 



39-63 

39-190 

39-291 



39-24 

59-53 

59-85 

59-1 1 1 

39-142 

39-175 

59-204 

39-232 

39-265 

59-295 

39-322 

39-555 

39-385 

43-189* 



39-66 

39-192 

39-413 



39-26 

39-55 

39-85 

39-115 

59-144 

59-175 

59-206 

59-254 

59-265 

59-296 

59-524 

59-555 

59-587 



39-407 39-410 



39-561 59-577 



39-390 39-405 



39-68 

39-194 

43-184* 



59-28 

59-57 

59-87 

59-115 

59-146 

59-1 78 

59-208 

59-236 

39-267 

59-298 

59-326 

39-557 

59-589 



45-199* 

45-53* 

43-56* 



39-71 
39-196 



39-75 
39-204 



39-50 

59-59 

59-89 

59-118 

59-149 

59-180 

59-210 

39-239 

39-270 

59-500 

59-528 

39-360 

39-591 



59-52 

59-61 

59-91 

39-120 

39-151 

59-183 

39-212 

39-241 

39-272 

39-302 

39-330 

39-362 

39-393 
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no 8-25 39- 1 7* 

riOO 39-132* 

riOl 39-134* 

'102 8-199 39-136* 

'103 39-138* 

nOA 39-K1* 

f105 39-143* 

'106 39-145* 

107 39-148* 

11 8-28 39-19* 

rilO 39-150* 

rill 39-152* 

'112 39-154* 

n 13 39-156* 

riK 39-158* 

ri 15 39-160* 

T116 39-163* 

ri 17 39-165* 

ri2 8-31 39-21* 

120 39-167* 

T121 39-170* 

T122 39-172* 

T123 39-174* 

T124 39-177* 

ri25 39-179* 

T126 39-182* 

ri 27 39-184* 

ri3 8-34 39-23* 

ri30 39-187* 

131 39-189* 

T132 39-191* 

ri33 39-193* 

ri34 39-195* 

ri35 39-197* 

T136 39-199* 

T137 39-201* 

T14 8-37 39-25* 

rHO 39-203* 

fH1 39-205* 

'142 39-207* 

143 39-209* 

T144 39-211* 

'145 39-213* 

r 146 39-215* 

'147 39-217* 

T15 8-40 39-27* 

ri50 39-219* 

151 39-221* 

T152 39-223* 

'153 39-225* 

154 39-227* 

r 155 39-229* 

156 39-231* 

ri57 39-233* 

'16 8-43 39-29* 

'160 39-235* 

767 39-238* 
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PUT 1 < 3 

t~l IOC 








CMT1 

CHI I O J 


yr-c*»c» 






run d-L. 
tnl I D** 


TO ->//«. 
J^f— £*♦*•» 






CUT 1 <>C. 

tnl IOj 








tnl loo 








tn MO' 


JTF— CJ 1 * 






CUT 1 7 

CHI 1 f 


C— «»0 


39- 


•31* 


CMT 1 7n 
t"l 1 ' u 


0 1 7J 


39-253* 


CMT 1 71 

t™ I I r I 








CMT 1 75 

tn 1 f C 


JTf— C J r » 






CMT1 7? 


o— cUc 


39-259* 


CMT 1 7 1. 


O CU J 


39-261* 


CMT 1 7C 

tm ' n 


O'eUO 


39- 


•264* 


CMT 1 7t* 

tn i 1 ' o 


R— 31 1 


39- 


•266* 


CMT 1 77 

C ~ 1 Iff 


39-268* 






CMT? 
tn 1 C 


R—/» 
o o 


39-4* 


FMT?n 


R— LQ 

O T 


3Q- 


•33* 


FMTPfift 
tn i cuu 


R-?l 7 




CO"" 


FMTPOI 

tn i \ 


'Q-.271 M 






t n i c \jc 








tn i c\jj 


^Q-?7=;# 






FMTPfU. 
tn i cUh 


XO-P77» 

*<J-?79# 

J7 C ' ;*W 






tn 1 C\J J 






tn i cvo 








CMT3fl7 








CMT/?1 
1 C 1 


O Jc 






cmt pin 

en it lu 








CMT 71 1 


J/ LOO* 






EMT212 








tn i c i j 


3™C/C* 






FMTPli 
Cnic I *• 








CMT 71 S 








fmtpi f\ 

cnic i o 








CMT PI 7 

tn iti( 








tn i cc 




39- 


37* 


FMT??fi 
tn i cc\J 

tn i cc i 














tn i ccc 








CMTPP^ 

tn i ccj 








C~F cc** 


J~J F F * 






tn f cc j 


J 7 J 1 






c n i ceo 


7.0— *.l Sir 






tn i cc f 








tn i e j 


R-SR 


39- 


•39# 


FMTPV) 

cnic Jv 








C"'c J l 


J~JC I * 






tn i c Jc 








tn» cjj 


JT J C J* 






Cnic JH 








EP.T235 


39-329* 






EMT236 


39-331* 






EMT237 


39-334* 






E«T2A 


8-61 


30- 




EnTc?40 


39-336* 






E«T241 


39-338* 






FnT242 


39-340* 






f«W3 


39-343* 
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SEO 0176 



E*T244 

E* T 245 

EMT?<,6 

E*T247 

EMT25 

EMT250 

EMT251 

EWT252 

EMT253 

E« T 254 

EMT255 

EMT256 

EMT257 

E1T26 

EMT260 

EMT261 

EMT262 

EMT263 

EMT264 

EMT265 

EHT266 

EMT267 

EMT27 

EMT270 

EMT271 

EMT272 

EMT273 

EMT274 

EHT275 

EMT276 

EMT277 

EMT3 

EMT30 

EMT300 

EMT3CH 

EMT302 

EMT31 

EMT32 

EMT33 

EHT34 

EMT35 

EMT36 

EMT37 

EHT4 

EMTAO 

EWT41 

EWT42 

E«T43 

EMT44 

EMT45 

EWT46 

E«T47 

EMT5 

EMT50 

EHT51 

EHT52 

EWT53 



39-345* 
39-34?* 
39-349* 
39-352* 
8-64 
39-354* 
39-356* 
39-359* 
39-561* 
39-363* 
39-365* 
39-368* 
39-370* 
8-67 
39-372* 
39-375* 
39-377* 
39-379* 
39-381* 
39-384* 
39-386* 
39-388* 
8-70 
39-390* 
39-392* 
39-395* 
39-397* 
39-399* 
8-196 
8-130 
39-405* 
8-9 
8-73 
39-407* 
39-410* 
8-214 
8-76 
8-79 
8-82 
8-85 
8-88 
8-91 
8-94 
3-12 
8-97 
8-100 
8-103 
8-106 
39-76* 
8-112 
8-115 
8-118 
8-15 
8-121 
8-124 
8-127 
39-90* 



39-43* 



39-45* 



39-48* 



39-401* 
39-403* 

39-6* 
39-50* 



39-412* 
39-52* 
39-54* 
39-56* 
39-58* 
39-60* 
39-62* 
39-64* 
39-8* 
39-67* 
39-69* 
39-72* 
8-109 

39-78* 
39-80* 
39-82* 
39-10* 
39-84* 
39-86* 
39-88* 



39-74* 
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SEQ 0177 



EMT54 

EMT55 

EMT56 

EMT57 

EMT6 

EMT60 

EMT61 

EMT62 

EMT63 

EHT64 

EMT65 

EMT66 

EMT67 

EMT7 

EMT70 

EMT71 

EMT72 

EMT73 

EHT74 

EMT75 

EMT76 

EMT77 

EMTVEC 

ENBSCH 

EQUALS 

ERR 

ERRNMB 
ERROR 
ERRTYP 
ERRVEC 

ERTYOO 

ERTY01 

ERTY02 

ERTY03 

ERTYCK 

ERTY05 

ESRC 

FO 

F1 

r? 

F3 
F4 
FFR 
F«H6 

FNCDre 

FNCWSK 
GfTBUf 
GNS 



GO 

GTSWR 
HCE 
HCI 
HCRC 



8-133 

8-136 

8-139 

8-142 

8-18 

8-K5 

8-K8 

8-151 

8-154 

8-157 

8-160 

8-163 

8-166 

8-22 

8-169 

8-172 

8-175 

8-178 

8-181 

8-184 

8-187 

8- 190 
4-682* 

1 3-564 

36- 3* 
4-751* 

30-48* 
4-682* 

29- 1 
4-682* 

28-1 

30- 21 
30-46 
30-51 
30-53 
30-152 
30-39 

4-823* 
4-693* 
4-692* 
4-691* 
4-690* 
4-689* 
4-775* 
4-849* 

37- 55* 

4- 695* 
7-0* 

5- 1 
33-1 
33-1 

4-694* 
19-61 

9- 28 
4-772* 
4-851* 
4-771* 



39-92* 
39-94* 
39-96* 
39-98* 
39-1 3* 
39-100* 
39-102* 
39-104* 
39-106* 
39-108* 
39-110* 
39-112* 
39-114* 
39-1 5* 
39-117* 
39-119* 
39-121* 
39-1 23* 
39-125* 
39-1 26* 
39-128* 
39-1 30* 
9-23* 
13-635 



30-1 3* 
9-23 
28-1* 
30-165* 
30-166* 
30-167* 
30-168* 
30-169* 
30-170* 
19-124 



4-781 
13-559 



5-1 
33-1 
33-1 
1 3-562 

33-1* 
4-781 

13-781 
4-781 



9-23* 
13-690 



30-49* 30-52 



9-23* 
28-1* 



13-816 



30-57 



9-23* 
28-1* 



13-927 
30-64 



9-25* 
23-1* 



13-.-05 13-:47 13-.-72 13-=40 13-795 13-922 19-3* 



30-160* 



9-26* 15-6 
28-1* 29-1 



15-7 
29-1* 



15-8* 
29-1* 



15-9* 



15-25* 15-46* 15-47* 28-1 



19-128 



13-755 
1 3-630 



9-6 
33-1 
33-1 
13-633 



13-755 
13-816 
13-755 



13-741 



9-28 
33-1 
33-1 
13-688 



37-77 



13-743 1 3-811 13-922 1 3-.-00 13-.-42 1 3-.-60 1 3-=37 1 3-781 13-616 



9-42 
33-1 
33-1 
13-814 



9-53 
33-1 
33-1 
13-925 



9-59 
33-1 
33-1 
l3-:03 



9-60 
33-1 
33-1 
l3-:45 



11-30 
33-1 
33-1 
13-; 70 



14-20 
33-1 



14-20 
33-1 



33-1 
33-1 



33-1 
33-1 



33-1 
33-1 



13-= 38 13-786 13-820 16-19 17-17 



37-78 37-8* 



37-85 37-86 
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HELP 


10-17 


45-26* 




30-90 


HT 


4-682* 


27-1 


27-1 


IAE 


4-769* 


37-59 


37-69 


37-77 


IBS AVE 


29-1 


29-1 


29-1 


29-1 


IDXMSK. 


A-913# 








IE 


A -926* 


4-959* 




37-68 


ILF 


4-779* 


37-58 


37-67 


37-8A 


37-87 


37-88 




ILF02 


4-699* 








ILF2A 


4-709* 








ILF26 


4-710* 








ILF 30 


4-714* 








ILF 32 
ILF5A 


A-71A* 








A-71A* 








ILF 36 


4-714* 








ILF AO 


4-714* 








ILFA2 


A-71A* 








ILF AA 


A-71A* 








ILFA6 


A-71A* 








ILF5A 


A-71 7* 








ILF56 


4-718* 








ILF6A 


4-7?1* 








ILF66 
ILF7A 
ILF 76 


4-722* 








4-725* 






13-111 


4-726* 


13-78 


13-93 


ILR 


A-778* 








ILRG50 


A-910* 








ILRG52 


A-910* 








ILRG5A 


A-910* 








ILRG56 


A-910* 








ILRG60 


4-910* 








ILRG62 


4-910* 








ILRG6A 


4-910* 








ILRG66 


4-910* 








ILRG70 


4-910* 








ILRG72 


4-910* 








ILRG7A 


4-910* 








ILRG76 


4-910* 




9-23* 




IOTVEC 


4-682* 


9-21' 




IPCKO 


4-963* 








IPCKl 


4-962* 








IPCK2 


4-961* 








IPCK3 


4-960* 








IR 


4-939* 


13-13 


13-34 




JVC 


4-878* 


37-58 


37-59 


37-60 


37-7A 
37-88 


37-75 


37-76 


37-77 


iBC 


4-880* 








LBT 


4-755* 








L CLOCK 


15-27 


15-56* 






LCOUNT 


15-29 


15-70* 






LF 


4-682* 


27-1 


27-1 


30-88 


43-186 


43-187 


43-188 


43-18 c 


LODF v 


9-130 


36-25* 






LS 


4-832* 








LSC 


4-879* 








LST 


4-833* 









37-78 
29-1 



37-81 
29-1* 



37-70 37-71 



37-82 
29-1 • 



37-72 



37-85 
29-1* 



37-86 
29-1* 



37-73 37-74 



37-75 



37-76 



37-79 



37-80 37-83 



13-124 13-165 13-189 13-222 13-238 13-428 13-432 



37-62 
37-78 



36-11 
43-189 



37-63 
37-79 



43-118 
43- 1 90 



37-64 
37-80 



37-67 
37-81 



37-68 
37-82 



37-69 
37-83 



37-70 
37-84 



37-71 
37-85 



57-72 
37-86 



37-73 
57-87 



43-175 43-179 43-180 43-181 43-182 43-183 45-184 43-185 
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LS T OP 
LSfRK 
MCLK 



MCPE 

MDF 

MOPE 

m 

MOC 



NOH 
MOL 

MR1AAA 



MRD 

(IS 

(ISC 

MSDRVS 

MSE 

MSEN 



USER 

MSGDRV 

MSHELP 



MUD 
MWP 
MXF 
N 

NDTMSK 

NED 

NEW 

NONE 

NOP 

NOTAVL 

NOTPRS 

NOlfm 

NSA 

OCC 

OFD 

OFFSET 

on 

OPE 
OP I 



15-28 
7-0* 
4-806* 
13-:23 
1 3->?0 
13-C 03 
4-921* 
4-811* 
4-937* 
4-814* 
4-809* 
13-715 
13-901 

20- 27 
4-841* 
4-753* 
4-835* 

13-; 18 
13-<98 
13->72 
13-B85 
4-807* 
4-812* 
4-81 5* 

10- 64 
4-887* 
4-805* 

13-718 
13-902 

21- 19 
4-810* 

11- 68 
10-11 

4-808* 
13-715 
13-901 
19-114 
21-19 
4-831* 
4-813* 
4-936* 

10- 19 
4-781* 
4-933* 
4-934* 

11- 7 
4-698* 
9-117 
9-114 
9-108 
4-839* 
4-819* 
4-852* 
4-704* 
4^760* 
4-877* 
4-766* 



1 5-84* 
11-55* 
13-755 
13-: 84 
13->39 
13-C05 



13-619 
4-835 
13-718 
13-902 
20-28 

9-110 
13-943 
13-; 19 
13-<99 
T3->98 
13-686 
13-943 
13-641 
13-656 
36-18* 

4-835 
13-719 
19-119 



36-19* 
36-7* 
4-835 
13-718 
13-902 
19-119 



36-30* 

9-88 

36-17* 

36-27* 
36-26* 
36-24* 



17-17 
17-19 

13-578 



11-63* 
1 3-766 
13-:96 
13->63 
13-C71 



13-680 

13-587 

13-719 

19-82 

21-10 



13-945 
13-; 41 
13-=55 
13-717 
13-697 
13-945 
13-657 
13-657 



13-641 
1 3-720 
19-120 



13-587 
13-719 
16-16 
19-120 



13-; 58 
13-780 
13-; 18 
13->72 
1 3-C90 



13-715 
13-641 
13-720 
19-106 
21-11 



13-946 
13-; 42 
13-=56 
13-718 
13-C71 
13-946 
13-661 
13-658 



13-642 
13-723 
20-10 



13-641 
13-720 
17-14 
20-10 



13-; 
1 5-794 
13-; 41 
13->79 
19-23 



19-56 
1 3-64 2 
13-723 
19-107 
21--3 



13-960 
13-; 85 
13-= 76 
13-743 
13-C 72 
13-980 
13-697 
13-696 



13-656 
13-724 
20-11 



13-642 
13-723 

19- 23 

20- 11 



13-9 



13-25 13-30 



13-=11 
1 3-829 
13-; 85 
13->98 
19-37 



20- 10 
13-656 
13-724 
19-114 

21- 19 



13-961 
13-; 86 
13-^77 
13-744 
13-C 90 
l3->76 
13-719 
13-697 



13-657 
13-829 
20-21 



13-656 
13-724 

19- 24 

20- 21 



13-; 10 13-; 36 13-<50 13-<95 13-A37 



13-44 



13-=33 
13-856 
13-<11 
13-704 
21-10 



13-657 
1 3-829 
19-119 



1 3-976 
13-<11 
1 3-=98 
13-A19 
13-C91 
13-702 
13-723 
13-698 



13-658 
1 3-830 
20-22 



13-657 
13-829 

19- 37 

20- 22 



13->88 
13-872 
13-<36 
13-717 
21-18 



13-658 
13-830 
19-120 



13-.-18 

13-<12 

l3-=99 

13-A20 

21-35 

13-685 

13-.-18 

13-718 



1 3-661 
13-856 
20-25 



13-658 
13-830 

19- 38 

20- 25 



13->91 
1 3-890 
13-<53 
13-743 
21-35 



13-661 
13-856 
20-10 



13-:23 

13-<36 

13->20 

13-A41 

21-36 

13-686 

13-: 23 

13-719 



13-662 
13-857 
20-26 



13-661 
13-856 

19- 56 

20- 26 



13-779 
13-901 
13-<77 
13-A19 
21-41 



13-662 
13-857 
20-11 



13-: 24 

13-<37 

13->21 

13-A42 

21-41 

13-C01 

13-:24 

13-720 



13-696 
13-872 
20-27 



13-662 
13-857 

19- 57 

20- 27 



13-B14 
13-945 
1 3-<98 
13-A41 
22-23 



1 3-696 
13-872 
20-21 



l3-:84 
13-<53 
13->39 
13-A70 

21- 42 

22- 47 
20-21 
20-25 



13-697 
13-873 
20-28 



13-696 
13-872 

19- 82 

20- 28 



1 3-960 
13-=55 
1 3-A70 
22-50 



13-697 
13-873 
20-22 



13-:85 
1 3-<54 
13->40 
13-A71 
22-23 

20-26 
20-26 



13-698 
13-890 
21-10 



13-697 
13-873 
19-106 
21-10 



1 3-982 
1 3-= 76 
13-A89 
22-52 



13-698 
13-890 
20-25 



13- :96 
13-<77 
1 3->63 
13-A89 
22-24 



20-27 



13-699 
13-891 
21-1 1 



13-698 
13-890 
19-107 
21-11 



13-984 
1 3-=98 
13-685 



13-699 
13-891 
20-26 



13-:97 
13-<78 
13->64 
13-A90 
22-43 



13-715 
13-901 
21-18 



13-699 
13-891 
19-113 
21-18 



17-21 
13-595 



13-597 37-57 



37-58 



37-59 37-fc! 



37-61 



37-62 37-63 



37-64 



37-65 37-66 
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37-67 


37-68 


37-69 


37-70 


37-71 




37-81 


37-82 


37-83 


37-84 


37-85 


OR 


4-938* 








19-70 


r^CAC*. 


4-708* 


16-19 


16-28 


19-61 


PAK.ACK 


4-707* 


4-708 








PAR 


4-776* 










PAT 


4-941* 










PCLOCK 


15-13 


15-52* 








PCOUNT 


15-15 


1 5-69* 




13-377 


13-391 


PDA 


4-826* 


1 3-323 


1 3-367 


PfECH 


30-67 


30-172* 








PFECH1 


30-^72 


30-173* 








PFECH? 


30-1 72 


30-1 76* 








PFECH3 


30-172 


30-179* 








PFECH4 


30-172 


30-181* 








PGE 


4-935* 










PGM 


4-756* 








1 3-<66 


PHA 


4-827* 


13-;% 


4 7 , v"\ "\ 

1 3-<02 


13-<62 


PIP 


4-752* 










PIRO 


4-682* 










PI ROVE 


4-682* 










PLCLK 


15-54 


15-58* 






13->50 


PLFS 


4-824* 


1 3-840 


13-879 


4 7 O Q 1 

1 3-881 




22-10 


22-13 


22-14 






PLSTP 


15-82 


15-86* 








°RO 


4-682* 


11-49 








PR1 


4-682* 










PR2 


4-682* 










PR 3 


4-682* 










PR4 


4-682* 










PR5 


4-682* 


15-64 






15-30 


PR6 


4-682* 


9-26 


15-9 


15-16 


PR7 


4-682* 


15-61 








PS 


4-682 


4-682* 








PSEL 


4-922* 










PS TOP 


15-14 


15-81* 








PSW 


4-682* 










PUTBUF 


7-0* 








7 / 4 . 

34-1 * 


PWRVEC 


4-682* 


9-23" 


9-23* 


7 / 4 ^ 

34-1 * 


QUES 


36-5* 






9-23* 




R6 


4-682* 


9-23 


9-23* 




R7 


4-682* 










RD 


4-723* 


1 3-925 


4 7 f\ 7 

13-: 03 


4 7 n 

13-820 


33-1* 


RDCHR 


10-12 


10-65 


10-82 


31-1 


RDLIN 


32-1 


33-1* 








RDOCT 


10-35 


10-49 


33-1* 






RDY 


4-925* 










READY 


1 1-37* 


14-16 


14-20 






READY 1 


4 4 7f 

1 1-35 


1 1-46* 








RECAL 


4-701* 










RESREG 


30-156 


33-1* 








RESVEC 


4-682* 










REX 


4-822* 










RG 


4-820* 


19-90 


19-95 






RH 


4-724* 


13-= 38 








RIP 


4-706* 










RLEASE 


4-703* 











37-72 
37-86 



37-73 
37-87 



37-74 
37-88 



37-75 



37-76 37-77 



37-78 



SF0 0180 
37-79 37-80 



13-392 13-395 13-A15 13-C19 13-C23 



13-881 13->50 13->53 13-728 13-735 13-642 13-649 13-66? 13-668 13-671 21-21 



34-1* 



34-1* 34-1* 34-1* 
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RMAS 

RMAS I 

RMASO 

RHBA 

RMBAE 

RMBAEI 

RMBAEO 

RMBAI 

RM&-0 

RMCS1 

RMCSli 
RMCS10 
RMCS2 

RMCS2I 

RMCS20 

RMCS3 

RMCS3I 

RMCS30 

RMDA 

RMDAI 

RMDAO 

RMDB 
RMOBI 
RMOBO 
RMDC 

RMDC I 

RMDCO 

RMDS 

RMDS I 

RMDSO 

RMDT 

RMDT I 

RMDTO 

RMEC1 

RMEC1I 

RMEC10 

RMEC2 

RMEC2I 

RMEC20 

RMER1 



RMER1I 

RMER10 
RMER2 

RMER21 

RMER20 



4-896* 

7-0* 

7-0* 

4-969* 

4-972* 

7-0* 

7-0* 

7-0* 

7-0* 

4-892* 
16-19* 

7-0* 

7-0* 

4-970* 
18-1 1 * 

7-0* 

7-0* 

4-973* 

7-0* 

7-0* 

4-893* 
13-410 

7-0* 
13-469* 

7-0* 
13-614* 

4-971* 

7-0* 

7-0* 

4-902* 
13-445* 

7-0* 
13-375 

7-0* 

4-894* 

7-0* 

7-0* 

4-899* 

7-0* 

7-0* 

4-906* 

7-0* 

7-0* 

4-907* 

7-0* 

7-0* 

4-895* 
13-426* 
13-663 

7-0* 
1 3-430* 

7-0* 

4-905* 
13-406* 

7-0* 
13-301 

7-0* 



13-58 
15-54 



13-560* 
4-967* 
17-17* 
13-85* 
13-562* 
9-85* 



13-79* 

13-465* 

13-86* 

13-471 

13-557* 

13-B15* 

13-60 



13-80* 
13-451 
13-87* 
13-431* 
13-558* 
9-87 



9-93 



13-448* 



13-112* 

13-430 

13-702 

13-120* 

13-432* 

13-113* 
13-412 
13-121* 
13-390* 



13-385* 
19-79* 



13-631* 

9-90 
19-61* 
13-93* 
13-633* 

9-86* 



13-86 

13-469 

13-95 

13-486* 

13-628* 

19-75 



13-87 
13-483* 
1 3-97* 
13-435* 
13-629* 
9-110 



11-59 



13-62 13-409* 



13-120 

13-443* 

13-706 

H-128 

13-433 

13-121 
13-447* 
13-125* 
13-396* 



13-686* 
13-78* 
19-85* 
13-119* 
13-688* 
9-88 



13-166* 
13-482* 
13-181* 
1 3-489 
13-683* 



13-176* 

13-497* 

13-184* 

13-436 

13-684* 

13-467* 



13-142* 

13-449 

13-725 

13-147* 

13-449* 

13-143* 
13-466* 
13-130 
13-397 



13-812* 13-923* 13-:01* 13-.-43* 
13-85 13-111* 13-119 13-165* 



13-;62* 13-=3S* 13-783* 13-618* 19-79 

13-172* 13-180 13-222* 13-230 13-428* 13-546 



13-124* 13-126 
13-814* 13-925* 
11-57* 11-58* 



13-173* 

13-486 

13-194* 



13-181 

13-501* 

13-200 



13-184 

13-503 

13-191* 

13-451* 

13-809* 

13-499* 



13-219* 

19-76* 

13-197* 

13-457* 

13-921* 

16-20 



13-147 

13-481* 

13-729 

13-150* 

13-452 

13-148 
13-470 
13-148* 
13-412* 



13-167* 

13-485 

13-754 

13-182* 

13-485* 

13-169* 
13-484* 
13-152* 
13-418* 



13-180* 13-189* 
13-:03* 13-.-45* 
13-8 13-15 



13-193* 13-199 13-230' 13-238* 
13-; 70* 13-= 38* 13-786* 13-620* 
13-25 13-29 13-36 13-44 



13-243 
19-85 

13-56 18-10* 



13-217* 

19-75* 

13-231* 



13-810* 13-920* 13-998* 



13-223* 
13-244 
13-: 40* 



13-231 13-265* 13-272 13-382* 13-388 
13-272* 13-281 13-388* 13-391 13-410* 
13-; 58* 13-; 59* 13>=33* 13-=34* 13-779* 



13-225* 13-233 13-267* 13-274 



13-203 
13-458 
13-999* 
16-24 



13-233* 
13-503* 
13-.-41* 
17-18 



13-240* 
13-507 
13-; 57* 
17-23 



13-246 
13-508 
13-=32* 
19-62 



13-367* 

13-274* 

13-778* 
19-66 



13-371 
13-291 
13-613* 



13-427* 
13-371* 
19-76 



13-446* 13-520 13-538 30-26 



13-174* 

13-500* 

13-759 

13-195* 

13-487 

13-177* 
13-498* 
13-185* 
13-419 



13-182 
13-575 
13-C43 
13-201 



13-185 
13-504 
13-192* 
13-470* 



13-226* 
13-577 
13-C50 
13-234* 



13-227* 
16-18* 
13-198* 
13-473* 



13-234 
13-594 
16-17* 
13-247 



13-235 
17-16* 
13-204 
13-474 



13-268* 
13-604 
17-15* 
13-275* 



13-269* 
19-60* 
13-235* 
13-504* 



13-275 
13-610 
19-59* 
13-297 



13-276 
19-84* 
13-241* 
13-510* 



13-366* 
13-620 
19-83* 
13-370* 



13-248 
13-511 



13-404* 

13-413 

13-780* 

13-431 
1 3-374 » 



1 3-370 
13-648 

13-372 



13-384* 13-390 



13-276* 



CZRMQBO RMG5/3/2 DSKLS TST 2 MACRO V04.00 
CROSS REFERENCE TABLE (CREF V01-O5 ) 



N 14 

4-APR-81 01:29:56 PAGE $-22 



SEO 018? 



FWHR 

RMHR1 

RMHRO 

RMLA 

RMLAI 

RMLAO 

RMMR1 



RWR1 1 
RfWRIO 

RMMR2 

RMMR2I 
RMKR20 
RMOF 

RMOF I 

RMOFO 

RMR 

RMSN 

RMSNI 

RMSNO 

RMWC 

RMUCI 

RMWCO 

RQA 

ROB 

RTC 

SA1 

SA16 

SA2 

SA4 

SA8 

SAOHSK 

SAVREG 

SC 

SCO 

SCI 

SC2 

SC5 



4-903* 

7-0* 

7-0* 

4-897* 

7-0* 

7-0* 

4-898* 
1 3-679* 
13-755* 
13-833 
13-909 
13-: 23* 
13-.-41* 
1 3-<65 
1 3-=98* 
13-703* 
13-397 
13-A91 
13-C 72* 
19-31 
19-119* 

21- 12 

22- 25 
7-0* 
7-0* 

13-702* 
4-904* 

13-C37 
7-0* 
7-0* 
4-901* 

13-411 
7-0* 

1 3-394 
7-0* 
4-777* 
4-900* 
7-0* 
7-0* 
4-968* 
7-0* 
7-0* 
4-863* 
4-864* 
4-705* 
4-742* 
4-738* 
4-741* 
4-740* 
4-739* 
4-746* 

30-13 
4-919* 
4-795* 
4-794* 
4-795* 
4-792* 



13-369* 13-408- 

45-9 
13-407* 



13-144* 

1 3-680* 

13-756* 

13-844 

13-941 

13-:24* 

13-; 42* 

13-<74 

l3-=99* 

13-705* 

13-A14 

13-A99 

13-C73 

19-37* 

19-120* 

21- 18* 

22- 34 
13-149* 
13-976* 
13-703 
13-387* 



13-81* 

13-444* 

13-88* 

13-411* 

13-559* 



13-149 

13-696* 

13-757 

13-856* 

13-943* 

13-: 25 

13-; 85* 

13-<77* 

13->00 

13-717* 

13-A19* 

13-841 

13-C81 

19-38* 

19-123 

21- 19* 

22- 49* 
13-154 
13-980* 
13-704* 
13-:57 



13-88 
13-450 
13-99* 
13-415* 
1 3-630* 



13-386* 13-429* 



13-52 
13-561* 



19-78* 
13-632* 



13-368* 

13-697* 

13-766* 

13-857* 

13-945* 

13-:32 

13-; 86* 

13-<78* 

13->20* 

13-718* 

13-A20* 

13-852 

13-C90* 

19-39 

19-127 

21- 20 

22- 51* 

13-981 
13-705 
13-: 62 



13-168* 

13-468* 

13-183* 

13-416 

13-685* 



13-587* 

13-698* 

13-767* 

13-860 

13-946* 

13-:84* 

13-; 87 

13-<83 

13->21* 

13-719 

13-A26 

13-861 

13-C91* 

19- 45 

20- 10* 

21- 32 

22- 53* 

13-982* 
13-: 71 



13-175* 
13-496* 
13-190* 
13-450* 
13-811* 



13-618* 

13-699* 

13-768 

13-872* 

13-947 

13-: 85* 

13-<05 

13-<93 

13->22 

13-737 

13-A35 

13-873 

13-C92 

19- 56* 

20- 11* 

21- 35* 



13-983 
13-: 77 



13-183 

13-502 

13-196* 

13-454* 

13-922* 



13-619* 

13-715* 

13-780* 

13-873* 

13-960* 

13-:86 

13-<11* 

1 3-<98* 

13->39* 

13-743* 

13-A41* 

13-C85* 

13-000 

19- 57* 

20- 21* 

21- 36* 



13-984* 
13-<22 



13-218* 
13-678* 
13-202 
13-455 
13-: 00* 



13-641* 

13-718* 

13-781* 

13-878 

13-961* 

13-: 96* 

13-<12* 

13-<99* 

13->40» 

13-744* 

1 3-A42* 

13-886* 

16-15* 

19- 82* 

20- 22* 

21- 38 



13-985 
13-<27 



13-224* 
19-77* 
13-232* 
13-502* 
13-: 42* 



13-642* 

13-719* 

13-782 

13-883 

13-962 

13-: 97* 

13-<13 

13-=55* 

13->41 

13-745 

13-A70* 

13-C02* 

16-16* 

19- 89 

20- 25* 

21- 41* 



13->72* 
13-=49 

13-232 

13-239* 
13-505* 
13-; 60* 



13-656* 

13-720* 

13-794* 

13-890* 

13-981* 

13-:9S 

13-<36* 

13-=56* 

13->55 

13-922 

13-A71* 

13-C04* 

17-14* 

19- 97 

20- 26* 

21- 42* 



13->76* 
l3-=66 

13-266* 

13-245 

13—37* 



13-657* 

13-723* 

13-795* 

13-891* 

13-983* 

13-; 09 

13-<37* 

13-=57 

13->63* 

13-i30 

13-A72 

13-C06* 

19-20* 

19- 106* 

20- 27* 
22-9 



l3->78 
l3->09 

13-273 

13-273* 

13-781* 



13-658* 

13-724* 

13-796 

13-901* 

13-985* 

13-; 18* 

13-<48 

13-= 76* 

13->64* 

13-366 

13-A80 

13-C18 

19-23* 

19- 107* 

20- 28* 
22-16 



13->79* 
13-336 

13-383* 

13-295 

13-816* 



1 3-661 • 

1 3-750 

13-829* 

13-902* 

13-986 

13-; 19* 

13-<53* 

13-=77* 

1 3->78* 

13-380 

13-A89* 

13-C27 

19-24* 

19-113* 

21- 10* 

22- 23* 



13->80 
13-344 

13-389 

13-389* 

19-77 



13-687* 15-813* 13-924* 13-:02« 13-.-44* 13-.-69* 13--36* 13-785* 13-819* 19-78 



13-662* 

13-753* 

1 3-830* 

13-903 

13-: 18* 

1 3-; 34 

13-<54* 

13-=78 

13->80* 

13-390 

13-A90* 

13-C 71* 

19-25 

19-114* 

21- 11* 

22- 24* 



13->98* 
13-C 31 

1 3-405* 
13-393* 



33-1* 



CZWW80 RW05/3/2 DSKLS T ST 2 HAC*0 V04.00 4-APR-81 01 
fRCSS REFERENCE TABLE (CREf V01-05 ) 
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;29:56 PAGE 



SC4 
SCOPE 

SCTC«P 

SCTMSK 

SEARCH 

SEE* 

SETcfS 

SETO* 

SE T VV 

SHUT 

SIZCIK 

SKI 

SMGPRT 
STACK 

STANDA 

START 

START1 

START? 

STKLMT 

STOPCL 

SUO 

SUOO 

SwOl 

SW02 

sy03 

SUCK 
SW05 
SW06 
SW07 
SW08 
SJ09 

swi 

SU10 
SW11 
SW12 
SW13 

swu 

SWI 5 

S«2 

S«3 

St* 

SW5 

SW6 

SW7 

SU8 

SW9 

SWR 

SW*fG 

Sf STAT 

TA1 

TA16 

TA2 

TM 

TA8 



4-791* 
4-682* 
1 3-91 7 
13-819 
t,-7970 
4-71 1* 
4-700# 
13-933 
17-15* 
16-13* 
31-t 
11-28 
4-876* 
4-844* 

4- 682* 
13-806 

9-67 

5- 1 

5- 3 
9-15 
4-682* 
7-0* 
4-682* 
4-68? 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 

4- 682* 

6- 0* 
28-1 • 

5- 1* 
9-77 
4-735* 
4-731* 
4-734* 
4-733* 
4-732* 



13-1 

13-995 

13-930 



13-: 11 



31-1 
15-5* 
13-152 
13-521 
9-23 
13-917 
10-3* 
9-17* 
9-14* 
9-18* 



13-73 
13-:37 
13-: 08 



1 3-801 
31-3* 



1 3-526 

13-1 

13-995 

11-33 



15-106 
13-; 54 
13-: 50 



13-157 
l3-=29 
13-; 75 



13-159 
13-775 
l5-=45 



13-326 
13-810 
13-798 



13- 518 

14- 9 

15- 825 



SEO 0183 



15-543 13-554 13-601 13-671 13-746 13-806 
20-7* 



13-628 21-6* 



13-531 
13-75 
13-: 37 



15-106 
15-; 54 



15-157 
l5-=29 



13-159 
15-775 



1 3-526 
13-610 



13-518 13-545 13-554 13-601 15-671 13-746 



11-42 31-5 



13-572 13-^91 15-14* 15-28* 19-V4 19-102 20-17 

4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 
4-682* 



30-H 



9-23 
28-1* 

9-23 
36-20* 

11-63 
11-63 
71-55 



9-23 
28-1* 
9-28 



9-23* 
29-1 
31-1 



9-23' 
29-1 
31-1 



9-23* 
29-1 
31-1 



9-28 
29-1 



28- 1 

29- 1 



28-1 
30-H 



28-1 
31-1 



28-1 
31-1 



28-1 
31-1' 



28-1 
34-1 



28-1* 
34-1* 



13-= 11 13->91 



CZRMQBO RM05/3/2 DSKIS 1ST 2 MACRO V04.00 
TROSS REFERENCE TABLE <CREF Vd-05 ) 
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SEO 0184 



TADMSH 
TAG 

TAGAOR 
TAP 

T81TVE 

TIME 

TKVEC 

TPVEC 

TRAPVE 

TRE 

TRTVEC 

TST 

TS.'I 

TST10 

TST11 

TST12 

TST13 

TST14 

TST15 

TST16 

TST1 7 

TST2 

TST20 

TST21 

TST22 

TST23 

TST24 

TST3 

TST4 

TST5 

TST6 

TST7 

TSTAW3 

TSTOUE 



TYPBN 

TYPOS 
TYPE 



TYPOC 

TYPON 

TYPOS 

UO 

Ul 

U2 

UNS 

UNTWSK 

UNTOFF 

UNTON 

JPE 

USE 



4-745* 

4- 865* 

5- 9* 

4-840* 
4-682* 
7-0* 
4-682* 
4-682* 
4-682* 
4-920* 
4-682* 
4-866* 
13-1* 
13-543* 
13-554* 
13-601* 
13-671* 
13-746* 
13-806* 
13-917* 
13-995* 
13-73* 
13-: 37* 
13-; 54* 
l3-=29* 
13-775* 
13-610* 
13-106* 
13-137* 
13-159* 
13-326* 
13-518* 
30-44* 
7-0* 

13- 601 

14- 17* 
30-149 
14-20 

9-6 
9-130 

10- 44 

11- 7 

29- 1 

30- 134 

31- 1 
9-8 

33-1* 
9-45 
4-945* 
4-945* 
4-945* 
4-765* 
4-949* 
9-123 
9-133 
4-932* 
4-888* 



6-0 



15-58* 
31-1* 



9-56 



13-150 
13-12 
36-28* 
36-29* 



15-71* 
31-1* 



9-23* 9-23* 



28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28-1 

28- 1 

28-1 

28-1 

28-1 

28-1 

28-1 . 

28-1 

28-1 

30-45* 

11-8 

13- 671 
18-11 
33-1* 

14- 20 
9-28 
9-133 

10- 48 

11- 14 
30-20 

30- 1 52 

31- 1 
10-33 



30-47 
11-9* 
13-746 



13-33 



15-73* 



30-1 59* 

11-50 

13-806 



11-58 
13-917 



13-1 
13-995 



13-73 
13-:37 



13-106 
13-; 54 



13-137 
13-=29 



30-143 


33-1* 




9-59 


9-42 


9-48 


9-53 


9-134 


9-135 


9-142 


10-11 


10-54 


10-61 


10-62 


10-64 


11-25 


11-30 


11-67 


11-68 


30-21 


30-39 


30-40 


30-46 


30-154 


31-1 


31-1 


31-1 


31-1 


31-1 


31-1 


31-1 


10-47 


30-146 


31-1 


33-1* 


9-82 


11-16 


11-69 


30-22 



9-60 


9-77 


9-81 


10-16 


10-17 


10-19 


10-69 


10-75 


10-86 


14-20 


14-20 


14-20 


30-51 


30-53 


30-61 


31-1 


31-1 


31-1 


31-1 


33-1* 


34-1 


30-47 


30-52 


30-54 



13-159 
13-775 



9-83 
10-20 
10-87 
24-1 

30- 104 

31- 1 



33-1* 



13-326 
13-610 



9-108 
10-28 
10-92 
25-1 

30- 110 

31- 1 



13- ^18 

14- 11 



9-114 
10-32 
10-101 
26-1 

30- 114 

31- 1 



13- 543 

14- 13* 



9-117 

10- 34 

11- 3 
27-1 

30- 126 

31- 1 



13- 554 

14- 17 



9-123 

10- 40 

11- 6 

29- 1 

30- 132 

31- 1 



D 15 

' Z RMQBO RM05/3/2 DSM.S T ST 2 HACRO V04.00 4-APR-81 01:29:56 PAGE 

TP-OSS REFERENCE TABLE (CREF V01-05 ) SEO 0185 

l A 4-759# 16-21 16-25 19-65 19-67 

UA'CH 7-0* 13-569* 13-570 13-588* 13-589 15-74- 15-76* 19-88* 19-92 20-14* 20-15 

3c 4-829* 3-758 3-769 13-773 13-783 13-786 13-797 13-834 13-861 13-904 13-948 13-963 13-987 13-991 

13—26 3-:30 3-:87 3-:99 13-.88 13-<14 13>=58 13-=79 13->01 13->23 13->42 13-^20 13-?46 1 3-A73 

13-A78 13-A92 13-C74 13-C79 13-C93 19-26 19-33 19-40 19-46 21-13 21-33 21-39 22-21 22-31 

WCD 4-715* 

WCE 4-931 * 17-77 37-78 

UCEMI 4-956* 

WCELO 4-957* 

WCF 4-774# 4-781 

UCH 4-716* , „ 

WD 4-719* 13-562 13-633 13-688 13-814 13-786 

WH 4-720* 13-:45 13-;70 

WLE 4-768* 4-781 37-81 37-82 

uRl 4-754* 

XNUDC 4-858* 13-97 13-191 13-225 13-240 13-292 13-295 13-374 13-435 13-457 13-507 

XNUER2 4-883* 13-125 3-192 13-227 13-241 13-302 13-305 13-396 13-418 13-473 13-510 

XNUOF 4-853# 13-81 13-99 13-190 13-224 13-239 13-286 13-289 13-393 13-415 13-454 13-505 

XSI' 9-7i# 10-71 10-102 rr 

XXDP 7-0* 9-33* 9-36* 9-37 9-39* 9-44 9-55 9-126 9-128 
y 36-31 » 
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SSCHRE 
$$CMTM 
S1ESCA 
tSNEWT 

$$SET 

MSETM 

SSSKIP 

.SACT1 

.SAPTB 

.SAPTH 

.SAPT i 

.SCATC 

.tCMTA 

.$EOP 

.SERRO 

.IPOWE 

. SRDDE 

.SRDOC 

.SREAD 

.SSAVE 

.SSCOP 

.SSIZE 

.STRAP 

.tTYPB 

.STYPD 

.STYPE 

.STYPO 

.EQUAT 

.HEADE 

.SETUP 

.SURHI 

.SURLO 

CLEAR 

CLKOFF 

CLKON 

CLKSNC 

COWMEN 

ENBS^H 

EMDCOM 

ERR 



FRROR 



t SCAPE 
GE TAS 



5-10* 
5-10* 
4-682* 
4-682* 
13-917 
33-1 
9-23 
4-682* 
4-674* 
4-674* 
4-674* 
4-674* 
4-670* 
4-671* 
4-671* 
4-671* 
4-673* 
4-672* 
4-672* 
4-672* 
4-673* 
4-671* 
4-673* 
4-o73* 
4-672* 
4-672* 
4-671* 
4-672* 
4-670* 
4-670* 
4-670* 
4-670* 
4-670* 
4-485* 
13-442 
4-594* 
4-S85* 
4-654* 
4-682* 
4-620* 
4-682* 
4-553* 
8-43 
8-85 
8-127 
8-169 
8-211 
4-682* 
13-460 
13-690 
13-933 
13-; 51 
13-760 
13-622 
4-682* 
4-272* 



6-0 


6-0 


6-0 


6-0 


6-0 




13-1 
1 3-995 
33-1 


13-73 
13-: 37 
33-1 


13-106 
13-; 54 
33-1 


13-137 
l3-=29 
33-1 


13-159 
13-775 
33-1 


13-326 
13-810 
33-1 



9-23* 

5- 5 

6- 0 
5-8 

35-1 

5-1 

5-10 
14-20 
29-1 
34-1 

32- 1 
31-1 

23- 1 
28-1 

33- 1 

24- 1 

25- 1 
27-1 

26- 1 
4-682 
4-678 
4-978 
4-679 
4-679* 

13-7 
1 3-464 
13-572 
13-569 
1 3-904 



8-3 
8-46 
8-88 
8-130 
8-172 
8-214 
13-16 
13-476 
13-710 
13-951 
13-; 72 
13-772 
1 3-825 



6-0* 



4-680 
13-28 
13-480 
13-591 
13-588 
13-831 



13-75 

13-495 

19-94 

19-88 

13-878 



13-108 
13-545 

19- 102 

20- 14 



13-116 
13-608 
20-17 



13-139 
13-677 



13-518 
33-1 



13-162 
13-748 



13-543 
33-1 



13-213 
16-14 



13-554 
33-1 



13-262 
19-19 



13-601 
33-1 



8-6 
8-49 
8-91 
8-133 
8-175 
8-217 
13-37 
13-491 
13-731 
13-966 
13-; 75 
13-795 
13-828 



8-9 

8-52 

8-94 

8-136 

8-178 

13-68 

13-513 

13-763 

13-992 

13-<06 

13-798 

13-831 



8-12 

8-55 

8-97 

8-139 

8-181 

13-103 
13-539 
13-774 
13-: 05 
13-<29 
13-301 
13-853 



8-15 

8-58 

8-100 

8-142 

8-184 

13-134 
13-551 
13-787 
13-: 08 
13-<67 
1 3-304 
13-874 



8-18 

8-61 

8-103 

8-145 

8-187 

13-156 
1 3-564 
13-800 
13-: 11 
13-<86 
13-331 
1 3-878 



8-22 

8-64 

8-106 

8-148 

8-190 

13-210 
13-581 
13-816 
13-:33 
l3-=26 
13-945 
13-C28 



8-25 

8-67 

8-109 

8-151 

8-193 

13-255 
13-598 
13-819 
13-: 47 
13-=40 
13-381 
13-C38 



8-28 

8-70 

8-112 

8-154 

8-196 

13-316 
13-613 
13-846 
13-: 50 
13-=43 
13-398 
13-C51 



8-31 

8-73 

8-115 

8-157 

8-199 

13-377 
13-623 
13-884 
13-:63 
1 3-=71 
13-A27 
13-C67 



13-671 
33-1 



13-746 
33-1 



SEO 0186 

13-806 
33-1* 



13-365 13-381 13-403 13-425 



13-564 13-635 13-690 13-816 13-927 13-:05 13-.-47 13-; 72 13-=40 13-795 13-822 



8-34 

8-76 

8-118 

8-160 

8-202 

13-399 
13-635 
13-910 
13-: 79 
13->15 
13-A56 
13-C82 



8-37 

8-79 

8-121 

8-163 

8-205 

13-421 
13-651 
13-927 
13-;15 
1 3->56 
13-A81 
1 3-D01 



8-40 

8-32 

8-124 

8-166 

8-208 

13-438 
13-667 
13-930 
13-; 26 
13-738 
13-800 
28-1 
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S£0 018- 



GETBA 

GE TBAE 

GETCS1 

GETCS2 

GET DA 

GETDB 

GFTDC 

GETDS 

GETDT 

GETEC1 

GETEC2 

GETER1 

CETER2 
GETHR 
GETLA 
GETMR1 



GETMR2 

GETOF 

GETPR1 

GETSN 

GETSUR 

GETUC 

GETX 

MSG 

MULT 
NEWTST 

NWTST 

POP 

PUSH 

PUTAS 

PUTBA 

PUTBAE 

PUTCS1 

PUTCS2 

PUTDA 

PUT06 

PUTDC 

PUTDS 

PUTDT 

PUTEC1 

PUTEC2 

PUTER1 

PUTER2 

PUT MR 
PUTLA 
PUTMR1 



A- 136* 
4-280* 
4-120* 
4-152* 
4-1 76* 
4-H4* 
4-184* 
4-160* 
4-208* 
4-224# 
4-232* 
4-168* 

13-648 
4-200* 
4-240* 
4-192* 
4-248* 

13-: 86 

13-719 

19-25 
4-256* 
4-264* 
4-682* 
4-216* 
4-682* 
4-128* 
4-112* 
4-8* 

13-917 
4-682* 
4-682* 

13-917 
4-498* 

13-917 
4-682* 
4-682* 
4-460* 
4-324* 
4-468* 
4-309* 
4-340* 
4-364* 
4-332* 
4-372* 
4-348* 
4-396* 
4-412* 
4-420* 
4-356* 

19-59 
4-388* 

17-16 
4-428* 
4-380* 
4-436* 

1 3-680 

13-766 



13-85 

13-8 

13-86 

13-87 
16-20 
13-520 



13-120 
13-663 
13-121 



13-149 

13-:98 

13-745 

19-39 

13-: 57 

13-88 

15-59 

9-28 



13-1 
13-995 

13-1 

13-995 

13-1 

13-995 

15-46 

15-6 

13-385 

19-79 

13-78 

13-79 

13-80 

13-467 

13-446 

13-448 

13-409 

13-112 

19-83 

13-113 

19-60 

13-369 

13-407 

13-144 

13-696 

13-767 



13-119 

13-29 

13-181 

13-184 
17-18 



13-147 
1 3-702 
13-148 



13-757 
13-; 09 
13-322 
19-89 
13-: 71 
13-183 



9-28* 



13-73 
13-: 37 

13-73 

13-: 37 

13-73 

13-:37 

15-47 

15-7 



13-111 

13-166 

13-176 
13-499 



13-180 

13-231 

13-233 
19-62 



13-182 
13-725 
13-185 



13-768 
13-; 34 
13-366 
19-123 
13-<22 
13-232 



13-106 
13-; 54 

13-106 
13-; 54 
13-106 
13-; 54 
18-12 
18-8 



13-165 
13-173 
13-219 



13-230 
13-272 
13-274 



13-234 
13-754 
13-235 



13-782 

13-; 87 

13-390 

21-12 

13-=66 

13-273 



13-137 
l3-=29 

13-137 

13-=29 

13-137 

l3-=29 

23-1 

2?-1 



13-172 
13-217 
1 3-225 



13-546 
13-388 
13-371 



13-275 
13-C43 
13-276 



13-796 

13-<13 

13-A14 

21-20 

13~>09 

13-389 



13-159 
13-775 

13-159 

13-775 

13-159 

13-775 

25-1 

25-1 



13-222 
13-223 
1 3-267 



13-410 
13-431 

13-370 
13-390 



13-833 

13-<48 

13-A35 

21-32 

1 3-936 

13-411 



13-326 
13-810 

13-326 

13-810 

13-326 

13-810 

32-1 

32-1 



13-428 
13-265 
13-367 



13-469 
13-451 

13-430 
13-412 



13-860 

13-<74 

13-A72 

21-38 

13-C31 

13-450 



13-518 

13-518 

34-1 
34-1 

16-19 

13-382 

13-427 



13-486 
13-503 

13-449 
13-470 



13-878 
13-<93 
1 3-A91 
22-9 

13-50? 



13-485 
13-504 



13-903 
13-=57 
13-841 
22-25 



13-575 13-594 13-610 13-620 



13-947 13-962 13-986 13-: 25 
13-=78 13->00 13->2? 13->41 
13-861 13-C18 13-C73 13-C92 



13-518 13-543 13-554 13-601 13-671 13-746 13-806 



13-543 

13-543 

34-1 
34-1 

17-17 

13-404 

13-445 



13-554 

13-554 

35-1 
35-1 

19-61 

13-,65 

13-483 



13-601 

13-601 

35-1 
35-1 

19-85 

13-482 

13-497 



13-671 13-746 13-806 
13-671 13-746 13-806 

35-1 



13-501 
19-76 



19-75 



13-142 


13-167 


13-174 


13-226 


13-268 


13-566 


1 3-426 


13-443 


13-481 


13-500 


16-17 


17-15 


13-143 


13-169 


13-177 


13-227 


13-269 


13-384 


13-406 


13-447 


1 3-466 


13-484 


13-498 


16-18 


19-84 
























13-408 
























13-368 


13-587 


13-618 


13-619 


13-641 


13-642 


13-656 


13-657 


1 3-658 


1 3-661 


13-662 


13-079 


13-697 


13-698 


1 3-699 


13-715 


13-718 


13-719 


13-720 


13-723 


13-724 


13-753 


13-755 


1 3-756 


1 3-780 


13-781 


13-794 


13-795 


1 3-829 


13-830 


1 5-856 


13-857 


13-872 


1 3-873 


13-89C 


1 3-891 
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PUTKR2 

PVJTOF 

PliTSN 

PUTWC 

PUTX 

REPORT 

RGBFMC 

SCTCHP 

SETLFS 

SETOM 

SETPRI 

SETTRA 

SETUP 

SETVV 

SKIP 

SLASH 

STARS 



SURSO 

TAGS 

TRMTRP 

TYPBIN 

TYPDEf 

TYPNAM 

TYPNUH 

TYPOCS 

TYPOf T 

TYPTXT 



1 3-901 
13-:85 
1 3-<54 
13->40 
13-A42 
16-15 
19-1K 
21-19 
4-444* 
4-452* 
4-404* 
4-317* 
4-301* 
4-682* 
4-12* 
4-632* 
4-64 3* 
4-609* 
4-682* 
33-1 
4-682* 
4-598* 
4-682* 
4-682* 
4-682* 
13-137 
13-671 
13--29 
31-1 
4-682* 
A -46* 
33-1* 
4-682* 
4-682* 
4-670* 
4-682* 
4-682* 
4-682* 
4-682* 



13-902 

13-:96 

13-<7? 

13->63 

1 3-A70 

16-16 

19-119 

21-35 

13-387 

13-81 

13-386 

19-78 



7-0 
13-819 
13-933 

11-49 
33-1 
9-23 



5- 5 

13-137 
13-671 
13- 29 
31-1 
9-23 

6- 0 



14-20 
4-682* 

9-82 
10-35 
9-6 



1 3-943 
13-: 97 
13-<78 
1 3->64 
13-A71 
17-14 
19-120 
21-36 

13-168 
1 3-429 



7-0 
1 3-930 
13-: 11 

15-64 
33-1 



5-8 

13-159 
13-746 
13-775 
31-1 
9-23* 



14-20 
9-28 

11-16 
31-1 
9-42 



13-945 
13-; 18 
13-<98 
13->78 
13-A89 

19- 20 

20- 10 

21- 41 



13-:08 
13-S01 

15-87 
33-1 



5-8 

13-159 
1 3-746 
13-?75 
31-1 



11-69 
9-53 



1 3-946 
13-; 19 
1 3-<99 
1 3->80 
1 3-A90 

19- 23 

20- 11 

21- 42 



1 3-96C 
13-; 41 
13-=55 



13-961 
13-; 42 
13-=56 



13-703 13-705 



13-885 

19- 24 

20- 21 
22-23 



1 3-B86 

19- 37 

20- 22 
22-24 



13-981 
13-; 85 
13-=76 
13-717 
13-C02 

19- 38 

20- 25 
22-49 



13-983 
13-; 86 
13-=77 
13-718 
13-C04 

19- 56 

20- 26 
22-51 



13-985 
13-<11 
13-^98 
13-743 
13-C06 

19- 57 

20- 27 
22-53 



13-.-18 
13-<12 
1 3-=99 
13-744 
13-C71 

19- 82 

20- 28 



13-: 23 
13-<36 
1 3->20 
13-A19 
13-C72 
19-106 
21-10 



13-: 50 
1 3-828 

31-1 
33-1 



5-8 

1 3-326 
13-806 
13-810 
31-1 



30-22 
9-59 



13-; 75 l3-=43 13-798 13-825 



33-1 



6-0 
13-326 
13-806 
13-810 
32-1 



30-47 
9-60 



33-1 



6-0 
13-518 

13- 917 

14- 20 
33-1 



33-1 



6-0 
13-518 
13-917 
23-1 
34-1 



30-52 
11-30 



30-54 
14-20 



33-1 



13-1 

13-543 

13-995 

24-1 

34-1 



33-1 



13-1 

13-543 

13-995 

25-1 

35-1 



33-1 



13-73 
13-554 
13-:37 
26-1 



33-1 



13-73 
13-554 
13-:37 
27-1 



13-:24 
13-<37 
13->21 
1 3-A20 
13-C90 
19-107 
21-11 



SEO 0188 

13-:84 
13-<53 
1 3->39 
13-A41 
13-C91 
19-1 H 
21-18 



13-175 13-218 13-22; 13-266 13-383 13-405 13-444 13-468 13-496 19-77 



33-1 



13-106 
13-601 
13-; 54 
28-1 



33-1* 



13-106 
13-601 
13-; 54 
29-1 



14-20 



